تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
محتاج كود
#1
السلام عليكم ورحمته الله وبركاته

اسعد الله اوةقاتكم لكل خير
لدي طلب بسيط
وهو حمايه امر التعديل على نص معين في مربع تكست اللا اذا ادخل الرقم السري صحيح واذا كان خاطئ تظهر رساله بذلك حتى يتمكن من ادخالها بالشكل الصحيح
ان شاءالله وصلت الفكره
الرد
تم الشكر بواسطة:
#2
وعليكم السلام ورحمة الله وبركاته
اخي الكريم لماذا تصغر الخط رغم انه صغير بشكل افتراضيSmile يعني نحتاج للتكبيرSmile

بالنسبة للسؤال فابسط الامور هي اظهار مربع ادخال
كود :
Inputbox("اكتب كلمة المرور للاستمرار")
الرد
تم الشكر بواسطة: الشاكي لله
#3
شكرا اخي سعود على الرد
كتبت هالكود
Dim x As String
x = "password"
Dim y As String
y = InputBox("أدخل كلمة السر لتتمكن من التعديل")
If x <> y Then
MsgBox("للأسف كلمة السر خاطئة اتصل بمدير التطبيق")

End If

لكن اريد عندما تكون كلمة السر خاطئة هناك 3 محاولات بعدها تظهر رساله للمستخدم ويرجع الى التطبيق مره اخرى
ان شاءالله وصل الفكره
الرد
تم الشكر بواسطة:
#4
تفضل
كود :
Dim x As String = "password"
Dim Count As Integer = 0
Err:
If Count < 3 Then
    If Not x = InputBox("أدخل كلمة السر لتتمكن من التعديل") Then
        Count += 1
        MsgBox("للأسف كلمة السر خاطئة اتصل بمدير التطبيق")
        GoTo Err
    End If
Else
    MsgBox("لا يمكنك إدخال كلمة السر أكثر من ثلاث مرات")
End If
الرد
تم الشكر بواسطة:
#5
مشكور اخوي اسامة بارك الله فيك
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Sad محتاج برنامج تشفير قوى Mohamed Magdy 5 140 أمس, 04:01 AM
آخر رد: elgokr
  محتاج مساعدة فى حظر لينك معين من الويب بروزر Mohamed Magdy 1 30 أمس, 03:16 AM
آخر رد: elgokr
Sad محتاج كود فى اداة ال vlc Mohamed Magdy 1 60 13-12-18, 10:54 AM
آخر رد: Mohamed Magdy
  شباب محتاج مساعدة فى اداة ال vlc Mohamed Magdy 2 82 05-12-18, 10:49 AM
آخر رد: Mohamed Magdy
  محتاج كود يا شباب يبحث عن سطر او كلمة دخل الاسطضافة Mohamed Magdy 5 113 01-12-18, 12:26 PM
آخر رد: asemshahen5
  محتاج مساعدة فى عمل بسورد لى برنامجى+رابط قاعدة البينات من الاسطضافة Mohamed Magdy 14 292 29-11-18, 10:36 PM
آخر رد: Mohamed Magdy
  محتاج مساعدة فى تفعيل لى البرنامج Mohamed Magdy 8 193 27-11-18, 09:27 PM
آخر رد: Mohamed Magdy
  محتاج مساعدة فى تشفير برنامجي تشفير قوى Mohamed Magdy 2 71 27-11-18, 09:15 PM
آخر رد: mero5000
  محتاج كود فى الويب بروزر Mohamed Magdy 3 91 25-11-18, 01:30 PM
آخر رد: Mohamed Magdy
  محتاج مساعدة فى عمل اكثر من بسورد لى البرنامج Mohamed Magdy 2 76 23-11-18, 09:41 AM
آخر رد: Mohamed Magdy

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم