My statements are not executing and I am not getting any of my Display messages to come out on my Form when I Run the program.Code:Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Process1.Click Dim Number As String Dim Display As String Number = Val(txtNumber.Text) Display = lblDisplay.Text If IsNumeric(Number) = True Then If Number < 1 Or Number > 100 Then If Number > 100 Then Display = " The Number You entered is too high" ElseIf Number < 1 Then Display = " The Number You entered is too low" ElseIf Number >= 1 And Number <= 100 Then Process1.Enabled = False End If Else Display = " The number you entered is not between 1 and 100" End If Else Display = " You did not enter a numerical value " End If End Sub End Class




Reply With Quote