14-11-15, 09:14 PM
'****************************************
'كود دخول اكثر ممن اسم مستخدم وكلمة مرور
'****************************************
If Text1.Text = "1" And Text2.Text = "1" Then
Form1.Hide
Form2.Show
Text1.Text = clre
Text2.Text = clre
ElseIf Text1.Text = "2" And Text2.Text = "2" Then
Form1.Hide
Form2.Show
Text1.Text = clre
Text2.Text = clre
ElseIf Text1.Text = "3" And Text2.Text = "3" Then
Form1.Hide
Form2.Show
Text1.Text = clre
Text2.Text = clre
ElseIf Text1.Text = "admin" And Text2.Text = "admin" Then
Form1.Hide
Form2.Show
Text1.Text = clre
Text2.Text = clre
Else
MsgBox "اسم المستخدم او كلمة المرور غير صحيحه"
End If
End Sub
мσнαммє∂ вΐภ aℓΐ ˛♡
