لغات البرمجة

قواعد البيانات

دليل المواقع التخصصية

استخدام مفيد من استخدامات Select

  • طباعة
التفاصيل
الزيارات: 3738


Select Case Val(Text1.Text)

   Case 1 To 12

      MsgBox "قيمة مقبولة"

   Case Else

      MsgBox "قيمة غير مقبولة"

End Select

 



http://www.arabteam2000-forum.com/

Share |

معلومات إضافية