نقل قول: ايجاد حساب كاربري براي برنامه و Login شدن بآن
اين هم DropDownButton و آيتم هاش براي كار با حسابهاي كاربري
در ضمن براي پروژه سه متغير عمومي در يك ماجول با نام هاي CurrentUserName و CurrentPassword بسازيد
اينم يادم رفت بگم كه يك تابع در همون ماجول بسازيد با نام IsAdmin براي شناسايي نوع حساب كاربري
تابع IsAdmin
Function IsAdmin() As Boolean
If Len(CurrentUserName) > 0 Then
Return FirstForm.UsersTableAdapter1.GetUserTypeby(Current UserName)
Exit Function
ElseIf Len(CurrentUserName) = 0 Then
Return True
Exit Function
End If
Return False
End Function
پاسخ با نقل قول
