الصفحة الرئيسية

Public Class Form1Private Sub Button1_Click()Dim M As Single, Z As SingleM = Textbox1.TextIf M<= 1000 ThenTextbox2.Text = “1000 البرنامج يقوم بحساب الزكاه لاكثر من ElseZ = 0.025 * MTextbox2.Text = “الزكاه =” … متابعة قراءة مقال ٣ →

Public Class Form1Dim D As SinglePrivate Sub Button1_Click()D = InputBox(“ادخل درجه الحراره “) End SubPrivate Sub Button1_Click()If RadioButton1.Checked = True Then

Public Class Form1Dim I As IntegerDim A (3) As IntegerDim N As StringPrivate Sub Button1_Click () kN = InputBox( فضلا ادخل رقم الطالب “) End SubPrivate Sub Button2_Click() For I = 0 … متابعة قراءة مقال ١ →