تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] سؤال في الدالة الشرطية if
#1
كيف اضبط الكود التالي في التكس 
PHP كود :
Private Sub TextBox1_TextChanged(sender As ObjectAs EventArgsHandles TextBox1.TextChanged
        If TextBox1
.Text 20 Then
            MsgBox
("تم")
 
       End If
 
   End Sub 



المشكلة انه بمجرد كتابة رقم يتم تنفيذ الكود يعني عند كتابة رقم 1 تظهر الرسالة 
ولو اريد ادخل رقمين ما بقدر يعني مثلا 18 او 19 او 12 ينفذ الكود بمجرد كتابة بداية الرقم 
كيف حل هذا الاشكال
الرد
تم الشكر بواسطة:
#2
السلام عليكم...
يمكنك إستخدام زر Enter من لوحة المفاتيح لتنفيذ الأمر وهو كالتالي.
تفضل:
كود :
 Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
       If e.KeyCode = Keys.Enter Then
           If TextBox1.Text < 20 Then
               MsgBox("تم")
           End If
       End If
   End Sub
 الذي يدعي ان لغته هي افضل لغة برمجة، فاعلم انه مستخدم وليس مبرمج.
الرد
تم الشكر بواسطة:
#3
حفظك الله
اريد تنفيذ الكود بدون الضغط على انتر
يعني ينفذ الكود بعد كتابة رقمين
الرد
تم الشكر بواسطة:
#4
(10-10-20, 03:51 PM)ismaeel كتب : كيف اضبط الكود التالي في التكس 
PHP كود :
Private Sub TextBox1_TextChanged(sender As ObjectAs EventArgsHandles TextBox1.TextChanged
        If TextBox1
.Text 20 Then
            MsgBox
("تم")
 
       End If
 
   End Sub 



المشكلة انه بمجرد كتابة رقم يتم تنفيذ الكود يعني عند كتابة رقم 1 تظهر الرسالة 
ولو اريد ادخل رقمين ما بقدر يعني مثلا 18 او 19 او 12 ينفذ الكود بمجرد كتابة بداية الرقم 
كيف حل هذا الاشكال

PHP كود :
Private Sub TextBox1_TextChanged(sender As ObjectAs EventArgsHandles TextBox1.TextChanged
        If Val
(TextBox1.Text) >= 10 And Val(TextBox1.Text) < 20 Then
            MsgBox
("تم")
 
       End If
 
   End Sub 
الرد
تم الشكر بواسطة: ismaeel , اسامه الهرماوي
#5
هذا هو المطلوب
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال فى الكريستال mmali127 0 103 12-11-20, 01:20 PM
آخر رد: mmali127
  سؤال بخصوص الضريبة و الخصم في الفاتورة sofiane-phy 2 187 30-10-20, 11:06 PM
آخر رد: sofiane-phy
  سؤال في Html Agility Pack اليوم السابع 0 163 27-10-20, 07:55 PM
آخر رد: اليوم السابع
  [VB.NET] سؤال في geckowebbrowser farfour 2 170 25-10-20, 03:49 PM
آخر رد: farfour
  [VB.NET] سؤال في webbrowser farfour 6 324 24-10-20, 05:35 PM
آخر رد: farfour
  سؤال في التشيك بوكس اليوم السابع 3 190 24-10-20, 03:44 AM
آخر رد: kiki
  [VB.NET] سؤال توضيحي حول الحفظ عن طريق CommandBuilder larbihamri 2 264 19-10-20, 10:07 AM
آخر رد: larbihamri
  سؤال في listbox KIKO1992 2 199 13-10-20, 12:28 AM
آخر رد: KIKO1992
  [نقاش] سؤال MetoDas 1 185 08-10-20, 02:55 PM
آخر رد: PeterGhattas082460
  سؤال حول التنقل بالاسهم من لوحة المفاتيح Lathe1 2 204 08-10-20, 02:00 PM
آخر رد: Lathe1

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


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