PDA

View Full Version : راهنمایی در مورد یه کد کوچیک VB.Net



saeidz
پنج شنبه 14 شهریور 1392, 18:21 عصر
از دوستان کسی میتونه یه توضیحی در مورد این کد بده
؟
تو کرک کردنش مون


Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
Dim str As String = (Me.txt_5.Text & Me.txt_6.Text & Me.txt_7.Text & Me.txt_8.Text)
If (str.Length < &H10) Then
Interaction.MsgBox("شماره فعال سازی شما اشتباه می باشد", MsgBoxStyle.ApplicationModal, Nothing)
Environment.Exit(Environment.ExitCode)
End If
Dim data As Long = Convert.ToInt64(str)
Dim num As Long = Me.MKAUT_80(Me.RQST)
If (data = num) Then
Me.SaveRegister(data)
num = 0
Me.Hide
MyProject.Forms.MDIParent.Show
Else
num = 0
Interaction.MsgBox("شماره فعال سازی شما اشتباه می باشد", MsgBoxStyle.ApplicationModal, Nothing)
Environment.Exit(Environment.ExitCode)
End If
End Sub




که اینجاش واسم نا مفهومه

long data = Convert.ToInt64(str);
long num = this.MKAUT_80(this.RQST);