Kod:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim a As Double
a = 0
If TextBox1.Text = "" Then
MessageBox.Show("Add your e-mail", "Error")
Else
a = (a + 1)
End If
If RadioButton1.Text = "" Then
MessageBox.Show("Select monney!"...