تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
سؤال فى الINPUTBOX
#1
رسالة الINPUTBOX تظهر ومعها زران OK, CANCE
ولكنى حين أضغط على الزرCANCE أجد البرنامج اما يعترض وينهى عملية الRUN واما يعتبر قيمة المتغير المطلوب ادخاله تساوى صفر ، والصواب طبعآ غير ذلك
الصواب أن يعيد الوضع كما كان وكأن جملة الINPUTBOX لم تكن موجودة فى الكود أصلآ
الصواب أنه عند الضغط على هذا الزرCANCE ينفذ أمرآ معينآ (يكون مكتوبآ فى الكود) (كما هو الحال فى الMsgBox)

وهذا كوزد بسيط يوضح سؤالى
كود :
[align=left]Private Sub Command1_Click()
S1 = 50
S2 = InputBox("أدخل العدد الثانى")
SUM = S1 + S2
Print "         SUM = "; SUM
End Sub[/align]
ولكم ألف شكر
الرد }}}}
تم الشكر بواسطة:
#2
-
منقول

كود :
S1 = 50

S2 = InputBox("أدخل العدد الثانى")

If StrPtr(S2) = 0 Then
    MsgBox "Canceled ألغي"

ElseIf IsNumeric(S2) Then
    MsgBox "SUM = " & (S1 + S2)

End If
الرد }}}}
تم الشكر بواسطة:
#3
جزاك الله خيرآ
ولك ألف شكر
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [vb6.0] سؤال في تنسيق الفورم basset87 4 137 02-01-17, 11:43 AM
آخر رد: basset87
  سؤال حول درس في الفيجوال tighrmte 11 595 20-12-16, 04:36 PM
آخر رد: tighrmte
Thumbs Down سؤال عن توليد خمس خانات من رقمين؟؟؟؟ KamelArab 7 171 09-12-16, 07:06 PM
آخر رد: KamelArab
  سؤال - توزيع حروف الكلمة في التكستات بالترتيب الأبجدي abusofy 8 192 09-12-16, 11:03 AM
آخر رد: abusofy
Lightbulb سؤال - توزيع حروف الكلمة في تكستات abusofy 3 156 07-12-16, 10:25 PM
آخر رد: abusofy
  [سؤال] سؤال بخصوص mdi form و child الخاصة بها engabuhema 2 122 29-11-16, 12:52 AM
آخر رد: engabuhema
  [سؤال] سؤال في الـ Decompile M@GED 0 83 05-11-16, 05:27 AM
آخر رد: M@GED
  سؤال في مثال كنونو 1 111 23-10-16, 02:16 AM
آخر رد: Ahmed_Mansoor
  [vb6.0] سؤال فى داتا ريبورت عن كيفية طباعة سجل واحد فقط المبرمج العتيق 4 227 02-10-16, 12:53 AM
آخر رد: Ahmed_Mansoor
  [سؤال] سؤال حول التقارير باسط الحسن 13 563 09-09-16, 10:25 PM
آخر رد: باسط الحسن

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


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