مساعده في عمل هذا الكود

Dim Counter As Integer
Dim IsRight As Boolean

For Counter = 1 To 3
	If InputBox("Enter the password please") = "123" Then
		IsRight = True
		Exit For
	Else
		IsRight = False
	End If
Next

If IsRight = True Then
	MsgBox "Right password"
Else
	MsgBox "Wrong password"
	End
End If

هذا مثال، عدله كما يناسبك

بالتوفيق

شكرا