الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

الرجاء المساعدة بي واجهة تسجيل دخول برنامج

بدأه jemmynet في 19 يوليو 2011 · 2 رد · 585 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

الرجاء المساعدة بي واجهة تسجيل دخول برنامج

الطلب الاول يتم فحص اسم المسشتخدم وكلمة المرور اذا كانا صحيحين يتم اخفاء الواجهة الحالية وفتح واجهة البرنامج الاساسية .

وهذا الكود


Dim user As String = TextBox1.Text
Dim pass As Integer = TextBox2.Text
If user = "admin" And pass = 12345 Then
Me.Hide()
Form2.Show()
End If

المساعدة بي هذا الطلب لم استطيع معرفة الكود 
السماح للمستخدم بي ثلاث محاولات فاشلة لادخال اسم المستخدم وكلمة المرور وبعد انتهاء المحاولات يتم انهاء البرنامج كليا .
البرمجة فقط بي if , for loop هذا المطلوب 

      
      

      
    

  

    
    

      
#2
        
        

      
السلام عليكم
أولاً ضع التعريفات في منطقة التعريفات العامة أو في موديول
Dim user As String = TextBox1.Text
Dim pass As Integer = TextBox2.Text
Dim a as integer
ثانياً الكود يكون بهذا الشكل
If user = "admin" And pass = 12345 Then 
Me.Hide()      
			Form2.Show() 
Else
a = a + 1
If a = 3 then
Msgbox "عفوا سيتم إغلاق البرنامج"
End
else
Msgbox "عفوا لم بتبق سوى " & vbnewline & 3-a  & "محاولة"
    	End If
End If

      
تم تعديل هذه المشاركة بواسطة Mady-AGC في 19 يوليو 2011 في 22:03

      
1

      
منحة للخريجين وطلاب الجامعات و المعاهد
دبلومة لتخريج مبرمج متخصص في هندسة صناعة البرمجيات وتصميم وبرمجة تطبيقات الأنترنت
سبحان الله وبحمده سبحان الله العظيم

    

  

    
    

      
#3
        
        

      
شكر جزيلا لك اخي الكريم بوركت جعله الله في مزان حسانتك

      
      

      
    

  

    
    
    
 مواضيع مشابهة





  

    
عدد الزوار حالياً
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

    
—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

    
جارٍ التحقق من المتواجدين…