كيف اضيف كلمة سر لبرنامج ؟

أهلا اخي/ اختي

VBProgrmer

أسعدني ردك و مرورك .......................... والكود الذي وضعته لي صعب جدا جدا ....... مستواي أقل من هكذا ( :wacko: :wacko: :wacko: )

فكرة برنامجي بسيطة جدا

لكن ربما أنا لم أوضحها جيدا ,,,,,,

الفكرة هو برنامج ,, عند ضغط زر button 1 يظهر لي مربع إدخال inputbox ادخل فيه كلمة المرور ( password ) بحث تكون مثلاُ cute123

إذا كانت صح يظهر msg box = congardualtions

إذا كانت خطأ ,, يظهر لي مسج بوكس = أعد المحاولة

وهكذا حتى ثلاث مرات..

ومن بعد المرة الثالثة ........... يظهر لي مسج بوكس= انتهت المحاولات

و ينطفئ البرنامج تلقائياً

عرفت ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

اقتباس

جربت أضع الكود في برنامجي ,, هو ماشي تمام

لكن

يحتوي على خطأ ... إذ أنه

لم أجد البرنامج ينطفئ عند انتهاء المحاولات الثلاث

يجب أن تظهر له الرسالة بعد المحاولة الثالثة وبعدها مباشرة يُنهى البرنامج تلقائياً

الطريقة التي وضعتها لك هي عدم إمكانية الكتابة في التيكست بعد المحاولة الثلاثة ,, ولم أكن أعلم أنك تريده إغلاق البرنامج

أعتذر على تقصير فهمي لسؤالك ,,

عل كل نفس الكود للي عطيتك مجرد راح يكون فيه تغير بسيط

غير هذا الكود :

If x = 3 Then
Text1.Enabled = False
MsgBox "End try "
End If

والذي يعني إذا وصلت قيمة X =3 إذا عطل عمل التيكس وأظهر رسالة

غير الكود إلى :

If x = 3 Then
MsgBox "End try "
end
End If

والتي تعني إذا وصلت قيمة X =3 أظهر رسالة ثم أغلق البرنامج ,,,

أتمنى أكون قدمت ما تريد

تحيااااتي

أبو فهيد

اخي الكريم

اشكرك مجددا على الكود وعلى تفاعلك معي

والحمدلله البرنامج صار تمام بالإضافة إلى المساعدةالطيبة من الأخ VBProgrmer أيضا

كلاكما مبـدعين

إن شاء الله نأخذ من علمكم و لو قليل

وفقكم الله جميعا

ورزقكم ماتحبون و يرضى :wub:

تحياتي

كيوت