Form'a eklemeniz geraken nesneler:
Form üzerinde görülen nesneleri ekleyiniz:

Tasarımınızı yaptıktan sonra aşağıdaki adımları takip edin.
RadioButton1_Click Olayına aşağıdaki kodları yazınız.
If CheckBox1.Checked = True Then a = 2 End If If CheckBox2.Checked = True Then b = 3 End If If CheckBox3.Checked = True Then c = 2.5 End If If CheckBox4.Checked = True Then d = 1.5 End If If CheckBox5.Checked = True Then f = 0.5 End If TextBox1.Text = (a + b + c + d + f) * 0.8
RadioButton2_Click Olayına aşağıdaki kodları yazınız
If CheckBox1.Checked = True Then a = 2 End If If CheckBox2.Checked = True Then b = 3 End If If CheckBox3.Checked = True Then c = 2.5 End If If CheckBox4.Checked = True Then d = 1.5 End If If CheckBox5.Checked = True Then f = 0.5 End If TextBox1.Text = (a + b + c + d + f)
Değişkenleri tanımlayınız:
Dim a, b, c, d, f As Double
Hiç yorum yok: