الفيجوال بيسك - منتديات حاسبكو المتخصصة بمادة الحاسب الآلي

nadaa · 11-15-2008, 07:29 PM

ارجو من خواتي المعلمات الرد السريع كتبة البرمجة صحيحة ولكن لا ينفذ الكود حتى ضبط الخصائص صحيح ما السبب ؟

متميزه · 11-15-2008, 07:50 PM

بدر اسماعيل · 11-15-2008, 08:49 PM

ارسلي الفورم حق البرنامج بعد ماتحفظينه وبساعدك

nadaa · 11-16-2008, 01:07 AM

Private Sub Command_Click
A = Text1.Text
B = Text2.Text
A * B &"مساحة المستطيل" =Text3.Text
End Sub

متميزه · 11-16-2008, 02:51 PM

أول شيء تعرفين المتغيرات
Private Sub Command_Click
Dim A,B As Single
A = Text1.Text
B = Text2.Text
A * B & "مساحة المستطيل=" =Text3.Text
End Sub