+- Praca w domu - Dodatkowa Praca - Zarabianie przez Internet (https://zarabiam.com)
+-- Dział: Off-Topic (/Forum-Off-Topic-9)
+--- Dział: Off-Topic (/Forum-Off-Topic-10)
+--- Wątek: Czy ten kod jest dobry? (/Temat-Czy-ten-kod-jest-dobry-49865)
Czy ten kod jest dobry? - patyk339 - 18-02-2012 11:03
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!", "Error")
Else
a = (a + 1)
End If
If RadioButton2.Text = "" Then
MessageBox.Show("Select monney!", "Error")
Else
a = (a + 1)
End If
If RadioButton3.Text = "" Then
MessageBox.Show("Select monney!", "Error")
Else
a = (a + 1)
End If
If RadioButton4.Text = "" Then
MessageBox.Show("Select monney!", "Error")
Else
a = (a + 1)
End If
If RadioButton5.Text = "" Then
MessageBox.Show("Select monney!", "Error")
Else
a = (a + 1)
End If
If a = (5) Then
Timer1.Start()
ProgressBar1.Value = ProgressBar1.Minimum
End If
End Sub
End Class
Czy ten kod jest dobry?
Proszę o szybką odpowiedź.
Jeśli jest zły to proszę o wytłumaczenie mi o co w tym chodzi.
Na pw lub w temacie.