Private Sub Form_Click() 单击窗体，窗体上将会打印出：For i = 1 To 5 Print Tab(8 - i); String(i, Format(i));Next i End Sub
