doesnt work

Dim a, b As Integer

a = TextBox1.Text
b = TextBox2.Text


While a <> b

If a > b Then a = a - b Else : b = b - a end if

End While
MsgBox("cmmdc este " & a)

MsgBox("an error occured")

End Try


gives me an "end of statement expected" error because of the if condition in the while loop
Sign In or Register to comment.

Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!