Wątek przeniesiony 2021-09-16 10:13 z Inne języki programowania przez cerrato.

VBA Excel kłopot początkującego

0

Witam.
Próbuję "napisać" formularz, który będzie sprawdzał hasło-jeżeli hasło jest poprawne to przechodzi do innego formularza, jeżeli nie to po 3 próbach zamyka się cały formularz.
Mam problem z 2 rzeczami:

  1. Nie umiem zbytnio zrobić tego żeby po 3 razach formularz się zamknął (3 próby na wpisanie hasła)
    fragment mojego kodu który jest przypisany do przycisku "hasło"
Private Sub Hasło_Click()
Static e As Integer
e = 0
If TextBox1 = "alibaba" Then
Me.Hide
Rzymskie.Show
Else: e = e + 1
End If
If e = 3 Then
Me.Hide
End If
End Sub
  1. Jak przy wpisywaniu hasła do "textbox'a" wykropkować litery? :(
  2. Jak przy pomocy "Ifa" sprawdzić czy użytkownik wprowadził łańcuch znaków/znaki specjalne czy liczby? :(
    Chodzi np o to:
    If liczba then "Wprowadziłeś liczbę!"
    else if łancuch "Wprowadziles lancuch!!!"
    else if znak specjalny "Wprowadziles znak specjalny!!!"
0

ad. 1

Private e as Integer

Private Sub UserForm_Initialize( )
    e=0
End Sub 
Private Sub Hasło_Click()
    If e<3 and TextBox1 = "alibaba" Then
        Rzymskie.Show
        me.Hide
    End If
    e = e + 1   
    If e=3 Then
        me.Hide
    End If
End Sub

ad. 2
https://support.microsoft.com/en-us/help/830258/how-to-create-a-masked-password-dialog-box-in-office-programs-by-using-visual-basic-for-applications

ad.3
Poszukaj, np tutaj:
https://www.mrexcel.com/forum/excel-questions/400548-visual-basic-applications-password-validation-question.html

1 użytkowników online, w tym zalogowanych: 0, gości: 1