23-06-20, 10:53 PM
تفضل
PHP كود :
Private Sub textbox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
If Asc(e.KeyChar) = Keys.Enter Then
textbox2.Focus()
End If
End Sub
Private Sub textbox2_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox2.KeyPress
If Asc(e.KeyChar) = Keys.Enter Then
If TextBox1.Text = "يوزر" Then
If TextBox2.Text = "كلمة المرور" Then
Me.Hide()
Form2.Show()
Else
MsgBox("كلمة المرور خاطئة")
End If
Else
MsgBox("اليوزر خاطئ")
End If
End If
End Sub
