تقييم الموضوع :
  • 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 Immortal73 9 210 17-07-18, 01:24 AM
آخر رد: Immortal73
  [سؤال] سؤال مبتدي في موضوع الريجستري array-31 3 514 20-05-18, 11:20 PM
آخر رد: اسلام الكبابى
  [سؤال] سؤال حول فلكس اقريد gadr 8 701 14-04-18, 03:09 PM
آخر رد: Ashraf Elafify
Heart سؤال عن تطابق صورتين؟؟؟ KamelArab 0 110 05-04-18, 04:42 PM
آخر رد: KamelArab
  السلام عليكم سؤال ممكن اتحكم في قاعدة البيانات من جهاز اخر او عن النت محمد جبريل 1 157 21-03-18, 12:22 PM
آخر رد: ahmedabdelaliem
  سؤال عن ActiveReport عن الربط محمد حمد محمد 2 149 04-03-18, 01:00 AM
آخر رد: محمد حمد محمد
  سؤال أخير انشاء الله محمد حمد محمد 3 98 25-02-18, 04:11 AM
آخر رد: مصمم هاوي
  سؤال..... عن الاستعلام انا اره عجيب !!!! محمد حمد محمد 7 141 24-02-18, 08:59 PM
آخر رد: محمد حمد محمد
  سؤال عن اداءة التقرير Active Reports2.0 محمد حمد محمد 2 109 17-02-18, 10:10 PM
آخر رد: محمد حمد محمد
  سؤال عن طريقة لعرض محتويات الـ combox عندما ينتقل المؤشر اليها اي التركيز allobaed 1 93 16-02-18, 12:41 AM
آخر رد: Ahmed_Mansoor

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


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