فتح الفورم برقم سري

[محمدعوض]

اريد عمل كود عند الضغط على زر يظهر رسالة ادخل رقم السري عند كتابة الرقم صحيح يفتح الفورم

واذا كتبت الكود غلط يظهر الرقم السري غير صحيح ... اعيد كتابت الرقم

الرجاء المساعدة في عمل مثل هذه الكود وشكرا

يعني يوجد فورم وفي داخل الفورم زر عند الضغط على زر يظهر االرسالة ادخل كود السري

وشكرا .......

[ابوخليل]

 

Private Sub Form_Open(Cancel As Integer)
On Error Resume Next
If InputBox("ادخل كلمة المرور") <> 123 Then
Cancel = True
End If
End Sub

[محمدعوض]

شكرا اخي على المجهود