درس بسيط كيف تضع سيريال لبرنامجك

بسم الله الرحمن الرحيم

درسي الاول في المنتدى
كيف تضع سيريال لبرنامجك

اولا تفتح vb 08 ,vb 10 ثم windows application

قبل البدأ





ضع Button 1 و 1 TextBox

ثم اكتب في button1:



Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

If TextBox1.Text = "xh4sf-mc4s4-mds3h-mpo56" Then

MsgBox("Correct Key", MsgBoxStyle.Information, "Correct Key")

Form1.Show()

My.Settings.entered = "True"

My.Settings.Save()

My.Settings.Reload()

Else

MsgBox("Wrong Key!", MsgBoxStyle.Critical, "Error")

End If

End Sub

السيريال يوضع مرة فقط