22-10-14, 04:37 PM (آخر تعديل لهذه المشاركة : 22-10-14, 04:38 PM {2} بواسطة aftfm.)
اقرب المسافة للمشكلة
عند الغاء الكود في حدث الـ Load للفورم frmLogin
كود :
Private Sub frmLogIn_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If WinClass.Users_Count = True Then
MsgBox("لا يوجد مدير للنظام في البرنامج ,,, سيتم إضافتك كمستخدم رئيسي", MsgBoxStyle.Information, "إضافة مدير للبرنامج")
Me.Dispose()
frm_AddUsersNEW.Show()
Exit Sub
Else
Me.Show()
Me.txt_UserName.Focus()
End If
End Sub
اختفت المشكلة
مع انه مطلوب للتحقق من وجود مدير للنظام
كيف تحل المشكلة الان