matty
Scripting Guru
Posts: 8336
Reputation: 109
39 /  / 
Joined: Dec 2002
Status: Away
|
RE: Argh Visual Basic
code:
Private Sub cmdcalc_Click()
Dim Timestable, Number As Integer
For Timestable = 1 To 12
For Number = 1 To 12
frmTables.Print Number & " x " & Timestable & " = " & (Number * Timestable) & CHR(10)
Next Number
Next Timestable
End Sub
OR
code:
Private Sub cmdcalc_Click()
Dim Timestable, Number As Integer
For Timestable = 1 To 12
For Number = 1 To 12
frmTables.Print Number & " x " & Timestable & " = " & (Number * Timestable) & CHR(10) & CHR(13)
Next Number
Next Timestable
End Sub
This post was edited on 03-04-2005 at 01:55 AM by matty.
|
|
