Om een tafel van vermeniggvuldiging op te bouwen gebruiken we:
De code ziet er dan zo uit:
Private Sub cmdStart_Click()
Dim getal As Integer
Dim doorloper As Integer
getal = InputBox("Geef een geheel getal")
For doorloper = 1 To 10
lblTafel.Caption = lblTafel.Caption & doorloper & " * " & getal & " = " &
doorloper * getal & vbCrLf
Next doorloper
End Sub
Op te merken:
[VB Web] - [Leren programmeren] - [hlrnet] - [copyright]