طلبات السادة الأعضاء للعام الدراسي 2015-2016

[أحـمد قرنى]

[QUOTE=حسن الاستاذ;5833309]سؤالين لو سمحتم
كلمة 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

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

[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 بالانجليزي بس مش راضي يكتب معايا

[أحـمد قرنى]

[QUOTE=حسن الاستاذ;5834491]

المشاركة الأصلية كتبت بواسطة أحـمد قرنى

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

هيبقى ربط محتوى اداة مربع الكتابة بمحتوى المتغير n وعرضهما داخل اداة مربع الكتابة textbox