Joined
Last Seen
0 Reputation Points
Unknown Quality Score
No one has voted on any posts yet. Votes from other community members are used to determine a member's reputation amongst their peers.
0 Endorsements
Ranked #54.9K
|
[code]Private Sub Command1_Click(Index As Integer) If KeyAscii = vbEnter Then If Len(Trim(txtlogin)) > 0 And Len(Trim(txtpwd)) > 0 Then If CheckPwd(txtlogin, txtpwd) = "ok" Then MsgBox "Password ok" Else MsgBox "Wrong password or Login not found." End If Else MsgBox "Login and password should not be blank" End If End … 
|