تقييم الموضوع :
  • 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
جزاك الله خيرآ
ولك ألف شكر
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال عن قاعدة البيانات اكسس مبرمج جديد 5 91 17-02-17, 01:27 PM
آخر رد: مبرمج جديد
  [vb6.0] سؤال في تنسيق الفورم basset87 4 218 02-01-17, 11:43 AM
آخر رد: basset87
  سؤال حول درس في الفيجوال tighrmte 11 639 20-12-16, 04:36 PM
آخر رد: tighrmte
Thumbs Down سؤال عن توليد خمس خانات من رقمين؟؟؟؟ KamelArab 7 217 09-12-16, 07:06 PM
آخر رد: KamelArab
  سؤال - توزيع حروف الكلمة في التكستات بالترتيب الأبجدي abusofy 8 221 09-12-16, 11:03 AM
آخر رد: abusofy
Lightbulb سؤال - توزيع حروف الكلمة في تكستات abusofy 3 185 07-12-16, 10:25 PM
آخر رد: abusofy
  [سؤال] سؤال بخصوص mdi form و child الخاصة بها engabuhema 2 165 29-11-16, 12:52 AM
آخر رد: engabuhema
  [سؤال] سؤال في الـ Decompile M@GED 0 107 05-11-16, 05:27 AM
آخر رد: M@GED
  سؤال في مثال كنونو 1 133 23-10-16, 02:16 AM
آخر رد: Ahmed_Mansoor
  [vb6.0] سؤال فى داتا ريبورت عن كيفية طباعة سجل واحد فقط المبرمج العتيق 4 279 02-10-16, 12:53 AM
آخر رد: Ahmed_Mansoor

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


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