منتدى جزيرة الرياضيات

منتدى جزيرة الرياضيات (http://www.hesab.net/vb/index.php)
-   منتدى التعليم الإلكتروني (http://www.hesab.net/vb/forumdisplay.php?f=35)
-   -   الدرس السابع التحقق من القيم المدخلة رقمية او نصية (http://www.hesab.net/vb/showthread.php?t=3008)

الاستاذ خليل 07-18-2007 06:55 PM

الدرس السابع التحقق من القيم المدخلة رقمية او نصية
 
السلام عليكم

اضغط هنا للشرح بالصوت و الصورة
الواجب عمل برنامج يتحقق من قيمة رقمية رقمية او نصية
تحتاجون الى
textbox
زر
و تقولون له في الزر
اذا كانت القيمة رقمية ارسل مسج القيمة رقمية
اذا كانت القيمة نصية يرسل مسج ان القيمة نصية

و شكرا

refathafez 07-18-2007 11:18 PM

شكر وتقدير
 
شكر جزيلا وسوف تعمل الواجب
وشكرا

zine pef 07-19-2007 02:12 AM

اليكم الواجب اخواني منهم الأستاذ الفاضل خليل و الأعضاء المشركين الأعزاء
الواجب من هنا

الاستاذ خليل 07-19-2007 02:36 PM

عمل ممتاز zine pef

Amel2005 07-21-2007 06:23 PM

1 مرفق
السلام عليكم ورحمة الله وبركاته
الدرس رائع ... شكرا لك أستاذنا الكريم .
تطبيقى بالمرفقات ... أتمنى أن أكون قد وفقت .
تحياتى.

الاستاذ خليل 07-22-2007 04:57 AM

السلام عليكم

عمل ممتاز اخت امل اعجبني اختيارك لحدث LostFocus جزيت الف خير
كود:

Private Sub TextBox1_LostFocus()
If IsNumeric(TextBox1.Text) = False Then
A = MsgBox("فضلا ... أدخل رقمك وليس اسمك", vbOKOnly, "رسالة البرنامج")
TextBox1.Text = ""
Exit Sub
End If

End Sub



الساعة الآن 01:21 PM

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd. TranZ By Almuhajir