Ok I'm trying to create a multiplier where you can press a command button and it Randomizes to numbers and multiplies it.
this is the code so far...anyone know whats wrong..? please help if you know.
Code:
Private Sub cmdrandom_Click()
Dim MAX As Integer
Dim MIN As Integer
For MAX = 1 To 200
For MIN = 1 To 200
If cmdrandom.CausesValidation = True Then
Dim x As Integer
Dim y As Integer
Next
x = txtcode.Text
y = TxtCode1.Text
x = MAX
y = MIN
txtdone.Text = y * x
End If
End Sub
it keeps saying "COMPILE ERROR:"
"NEXT WITHOUT FOR"
Reply With Quote
Bookmarks