اقتباس:
المشاركة الأصلية كتبت بواسطة d7ome
عفواً ع التأخير ..
اللي سويته
Dim a , b , c as single
lable1.caption=c
text1.text=c
msgbox(c)
|
يعني قربت من الحل الصحيح
حمل من المرفقات الحل الصحيح
كود بلغة HTML:
Dim a, b, c As Single
a = Text1.Text
b = Text2.Text
c = a * b
MsgBox "مساحة المستطيل = " & c