Public Class EvenCheck_Input_Box Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim n As Integer n = InputBox("Enter the range: ") 'Debug.WriteLine("Inputted Value is: " & n) Print(n) End Sub End Class
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)