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

اساتذتي الاعزاء هل يمكن ان نضع باسوورد لل Button بمعنى عند الضغط علية قبل ان ينفذ الامر يطلب كلمة مرور وبعدها يقوم بالتنفيذ ؟
الرد }}}
تم الشكر بواسطة:
#2
السلام عليكم ورحمة الله ويركاته
اخي الكريم الامر ببساطة هو تعريف متغير نصي مثلا يحمل كلمة المرور وهي هنا ibrahim
وفي حذث الكليك للبوتون سنظهر InputBox لادخال كلمة المرور
ثم القيام بالتحقق منها فأن كانت صحيحة ننفذامرا ما وليكن اظهار رسالة ترحيب
اما ان كانت كلمة المرور خاطئة نظهر رسالة ان كلمة المرور خاطئة ونخرج من الحدث
الكود على النحو التالي :
كود :
   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Dim aa As String = "ibrahim"
       Dim kk As String = InputBox("Enter Password :", "Password")
       If kk = "" Then
           Exit Sub
       ElseIf kk = aa Then
           MessageBox.Show("Welcom to Vb4Arab")
       Else
           MessageBox.Show(" Password is Error ")
           Exit Sub
       End If
   End Sub
اعمل الخير وأجرك لا تنتظره فالله خير من إليك يرده
البرمجة ليست مجرد كود بل هي منهج تفكير منطقي لحل المشكلات







الرد }}}
تم الشكر بواسطة: asmarsou
#3
(28-02-21, 08:53 PM)ابراهيم ايبو كتب : السلام عليكم ورحمة الله ويركاته
اخي الكريم الامر ببساطة هو تعريف متغير نصي مثلا يحمل كلمة المرور وهي هنا ibrahim
وفي حذث الكليك للبوتون سنظهر InputBox لادخال كلمة المرور
ثم القيام بالتحقق منها فأن كانت صحيحة ننفذامرا ما وليكن اظهار رسالة ترحيب
اما ان كانت كلمة المرور خاطئة نظهر رسالة ان كلمة المرور خاطئة ونخرج من الحدث
الكود على النحو التالي :
كود :
   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Dim aa As String = "ibrahim"
       Dim kk As String = InputBox("Enter Password :", "Password")
       If kk = "" Then
           Exit Sub
       ElseIf kk = aa Then
           MessageBox.Show("Welcom to Vb4Arab")
       Else
           MessageBox.Show(" Password is Error ")
           Exit Sub
       End If
   End Sub
مااروعك سيدي ... هذا بالضبط ماكنت ابحث عنه 
دعواتي لك بالتوفيق والنجاح وفائق امتناني وشكري لشخصك الكريم
الرد }}}
تم الشكر بواسطة: ابراهيم ايبو
#4
الحمد لله والشكر لله
ولك اخي الكريم
اعمل الخير وأجرك لا تنتظره فالله خير من إليك يرده
البرمجة ليست مجرد كود بل هي منهج تفكير منطقي لحل المشكلات







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



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


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