السلام عليكم
عمل رائع انفنتي و الاستاذ رفعت حافظ
لي ملاحظة للاستاذ حافظ رفعت
يجب دائما اذ قيمة مربع النص رقمية يجب تحويلها لرقمية الا اذا كانت غير متغيرة ستعتبر نص
هكذا في الشريحة الاخيرة
كود:
Private Sub CommandButton2_Click()
TextBox3.Text = Val(TextBox2.Text) * 2 + 5
End Sub
قريبا سانجز درسكم