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

يتم الاعلان عنه واعطائه قيمة اثناء الاعلان فقط......

* لحساب معادلة من الدرجة الاولى
dim ........, y as single
if ............. Textbox.text then
y = ..................
....=3*x+2
label.text = y
............
من فضلك ادخل قيمة رقمية
end if