nhờ các bạn xem hộ code và sửa lai cho đúng

[cbtm]

nhờ các xem hộ nhửng đoạn sau, và sửa hộ mình, có kèm theo bài text password xem code là mâitrâm072006


Dim strPass As String
strPass = InputBox(prompt:="PASSWORD PLEASE", Title:="PLEASE ENTER YOUR PASSWORD")
If strPass = vbNullString Then
strPass = "Secret" 'InCorrect Password
MsgBox "PASSWORD INCORRECT, SORRY PLEASE TRY AGAIN", vbCritical, "BAN DA NHAP SAI"
End If

 

[Hai Lúa Miền Tây]

nhờ các xem hộ nhửng đoạn sau, và sửa hộ mình, có kèm theo bài text password xem code là mâitrâm072006


Dim strPass As String
strPass = InputBox(prompt:="PASSWORD PLEASE", Title:="PLEASE ENTER YOUR PASSWORD")
If strPass = vbNullString Then
strPass = "Secret" 'InCorrect Password
MsgBox "PASSWORD INCORRECT, SORRY PLEASE TRY AGAIN", vbCritical, "BAN DA NHAP SAI"
End If

Theo ý kiến của mình thì để tạo một form xác nhận pass. bạn nên tạo 1 userform riêng chứ ít có ai tạo InputBox để xác nhận mật khẩu hết bạn à

 

[cbtm]

bạn có thể giúp đở mình xem lại chỉ cách chính xác mình phải làm như thế nào không vậy. cám ơn bạn

 

[cadafi]

bạn có thể giúp đở mình xem lại chỉ cách chính xác mình phải làm như thế nào không vậy. cám ơn bạn

Ít ra bạn phải có một chỗ để lưu password đúng cái đã (một biến public chẳng hạn). Khi người dùng gõ vào Inputbox thì đem cái giá trị của inputbox so sánh với password đúng, nếu khớp thì thực hiện thao tác tiếp theo, nếu sai thì báo lỗi, v.v....