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

عندي مشروع ببرنامج الفيحوال بيسك


وقفني هذا الكود

كود التكرار اللى هو count


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


اتمني الاقي حل


بانتظاركم
الرد }}}
تم الشكر بواسطة:
#2
السلام عليكم ،
عندي طريقة :

# انشئ متغير رقمي ، وليكن NumOfPass
# عند الضغط على زر الدخول .. تزيد قيمة المتغير واحد .
# عند وصول المتغير الى 3 ، تظهر رسالة : لقد تجاوزت الحد الاقصى لعملية الدخول .

...
الرد }}}
تم الشكر بواسطة:
#3
حاجربها الان !

ان شاء الله يزبط
الرد }}}
تم الشكر بواسطة:
#4
ان شاء الله ..


بس اذا غلق البرنامج وفتحه مرة اخرى ، له ثلاث فرص
الرد }}}
تم الشكر بواسطة:
#5
مازبط !

الكود لازم فيه شرط if

وعدد اللى هو count .



عرفت متغير رقمي
count < 3
وبعدين كتبت له العداد count += 1




طيب


ممكن تفهمني قصدك
الرد }}}
تم الشكر بواسطة:
#6
السلام عليكم ورحمة الله وبركاته

كود :
Public Class Form1
    Dim Counter As Integer = 0


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If TextBox1.Text <> "" Then
            If TextBox1.Text = "vb" Then
                MsgBox("كلمة المرور صحيحة")
            Else
                MsgBox("كلمة المرور غير صحيحة")
                If Counter = 3 Then
                    MsgBox("انتهت محاولات الدخول")
                    Counter = 0
                    Me.Close()
                End If
                Counter += 1
            End If
        End If
    End Sub


End Class

****
***
**
*
(وَقُل رَّبِّ زِدْنِي عِلْمًا)

الرد }}}
تم الشكر بواسطة:
#7
وعليكم السلام ورحمه الله

اخي الكريم
kslawy

الله يفتح عليك دنيا واخره

كنت الف حول نفس الكود .. الكاونتر و if


بس بودي ان افهم

هذي الشرطين اش معناها بودي ان افهمها


If TextBox1.Text <> "" Then
If TextBox1.Text = "vb" Then

....................


يعني لو اردت اضافة اسمي وكلمه مرور خاصه بي ليتم فتح البرنامج والانتقال للفورم الاخر
مثلا "TextBox1.Text ="DEEM
TextBox1.Text =1234
form2.show

..............


المشروع يخص دراستي

لذا افضل ان افهمه
الرد }}}
تم الشكر بواسطة:
#8
بسم الله الرحمن الرحيم

بانسبة للكود هذا If TextBox1.Text <> "" Then فهو شرط ليتأكد بانة قد تم ادخال قيمة اي لم يتركها فارغة
ويمكن كتابتها اسضاً على النحو التالي If TextBox1.Text <> String.Empty Then
والاشارة هذه <> معناها لا يساوي .


والكود التالي معدل ليتم من خلاله التأكد من ادخال DEEM لاسم المستخدم و 1234 لكلمة المرور

PHP كود :
Public Class Form1
    Dim Counter 
As Integer 0



    
Private Sub Button1_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button1.Click
        
If TextBox1.Text <> "" Then
            
If TextBox1.Text "DEEM" And TextBox2.Text "1234" Then
                MsgBox
("كلمة المرور صحيحة")
            Else
                
MsgBox("كلمة المرور غير صحيحة")
                If 
Counter 3 Then
                    MsgBox
("انتهت محاولات الدخول")
                    
Counter 0
                    Me
.Close()
                
End If
                
Counter += 1
            End 
If
        
End If
    
End Sub


End 
Class 

تحياتي للجميع
ابــو سامي
الرد }}}
تم الشكر بواسطة:
#9
اهلا اخوي


انا جربت نفس طريقتك

وكتبت الكود اللى كاتبه


بس يظهر لى كلمة المرور غير صحيحه
حتي لو كتبت اسم المستخدم الصحيح
الرد }}}
تم الشكر بواسطة:
#10
جربت الكود على فورم جديد

وطلع اوكي



بس فورم اللموجود بالمشروع

يطلع اخطاء

هل من طريقه لاصلاح الاخطاء
بفروم المشروع





الكود صحيح


شكرا اخوي ابــو سامي
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  معرفة عدد مرات تكرار الاسم في الداتاقريدفيو صالح عبدالله 8 426 05-02-24, 04:39 PM
آخر رد: صالح عبدالله
  [VB.NET] منع تكرار البيانات في عند الادخال مبرمج صغير 1 2 255 24-01-24, 05:18 PM
آخر رد: مبرمج صغير 1
  عدم تكرار الاسم yossefsaad370 0 262 02-11-23, 12:28 PM
آخر رد: yossefsaad370
  كود لعدم تكرار الرقم في قاعدة البيانات yossefsaad370 1 340 28-10-23, 10:29 AM
آخر رد: atefkhalf2004
  تكرار الرقم القومى salah525 1 264 02-10-23, 10:14 PM
آخر رد: سالم العنزي
Rainbow مشكلة تكرار القيم في الكريستال ريبورت devpos 1 330 07-09-23, 11:48 PM
آخر رد: Asem2
  منع تكرار البيانات المدخلة على قاعدة البيانات الرائد 14 7,157 18-08-23, 08:10 PM
آخر رد: ahmed_king2023
  مساعدة في تكرار صفحات الطبع Reportview نيمو 0 397 20-06-23, 09:14 PM
آخر رد: نيمو
  تكرار البيانات من زر تعديل البيانات ( في البيانات المحفوظة ) خليل احمد المراني 8 971 26-05-23, 11:00 PM
آخر رد: خليل احمد المراني
  تعديل على كود حفظ بدون تكرار مصمم هاوي 11 1,254 18-03-23, 09:02 AM
آخر رد: مصمم هاوي

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


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