[حسن الاستاذ]

[QUOTE=أحـمد قرنى;5834406]

المشاركة الأصلية كتبت بواسطة حسن الاستاذ

سؤالين لو سمحتم
كلمة end if تكتب بينها مسافة ولا ايه
اه لازم يكون فى مسافة
كلمة dim لابد ان تكون كابتل ولا عادى سمول
مش هتفرق
-
إن&""& textbox1 =txtn.text وضح الكود السابق
مش فاهم اكود عايز ايه حضرتك متاكد من صحة كتابته
-- امامك برنامج يعطى خطأ ادا ادخلنا قيم نصية قم باعادة تصميم البرنامج باستخدام if

dim x ,y as single
If isnumeric ( textbox1.text) then
x = me . textbox1.text
y=3*x=2
label1.text=y
else
( " ادخل قيمة عددية " )msgbox
( ) Textbox1 . Focus
""= Textbox1 . txet
End If

شكرا جزيلا لرد حضرتك
بالنسبة للكود ان حرف n بالانجليزي بس مش راضي يكتب معايا