كبف أوافق وظيفة الزر موافق مع المفتاح ENTER..؟؟؟؟؟؟؟؟؟؟؟

اخي العزيز ضع هذا الكود في حدث keypress لمربع النص الذي تكتب فية كلمة المرور

If KeyAscii = 13 Then
Call  ok_sub
End If

حيث ان ok_sub هو اسم ال sub الخاص بمفتاح ok

وارجو ان اكون افدتك ;)

أو ممكن هذا الكود أختي :

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
ok.Value = True
End If
End Sub

ممكن ذلك بجعل خاصية Default لزر الامر = True