Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Public Class Form1
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- Dim Iv1 As Integer = TextBox1.Text
- Dim Iv2 As Integer = TextBox2.Text
- Dim Iv3 As Integer = TextBox3.Text
- Dim Iv4 As Integer = TextBox4.Text
- Dim Iv5 As Integer = TextBox5.Text
- Dim Iv6 As Integer = TextBox6.Text
- Dim Iv7 As Integer = TextBox7.Text
- Dim Iv8 As Integer = TextBox8.Text
- Dim Iv9 As Integer = TextBox9.Text
- Dim Iv10 As Integer = TextBox10.Text
- Dim Iv11 As Integer = TextBox11.Text
- Dim Iv12 As Integer = TextBox12.Text
- If Iv1 < 32 Then
- If Iv2 < 32 Then
- If Iv3 < 32 Then
- If Iv4 < 32 Then
- If Iv5 < 32 Then
- If Iv6 < 32 Then
- If Iv7 < 32 Then
- If Iv8 < 32 Then
- If Iv9 < 32 Then
- If Iv10 < 32 Then
- If Iv11 < 32 Then
- If Iv12 < 32 Then
- MessageBox.Show("Good")
- Else
- MessageBox.Show("NOT Good")
- End If
- Else
- MessageBox.Show("NOT Good")
- End If
- Else
- MessageBox.Show("NOT Good")
- End If
- Else
- MessageBox.Show("NOT Good")
- End If
- Else
- MessageBox.Show("NOT Good")
- End If
- Else
- MessageBox.Show("NOT Good")
- End If
- Else
- MessageBox.Show("NOT Good")
- End If
- Else
- MessageBox.Show("NOT Good")
- End If
- Else
- MessageBox.Show("NOT Good")
- End If
- Else
- MessageBox.Show("NOT Good")
- End If
- Else
- MessageBox.Show("NOT Good")
- End If
- Else
- MessageBox.Show("NOT Good")
- End If
- End Sub
- End Class
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement