Introduction - If you have any usage issues, please Google them yourself
In the form1 Private Sub Form_Load () to Public Sub Form_Load () in Form2 in: Call Form1.Form_Load private sub command1_click () dim max for i = 1 to 3 n = val (inputbox (" Enter the first" & i & " Number" )) if n> max then max = n end if next print " The maximum number of three numbers is" & max