乘法表：Private Sub Form_Click() For i = 1 To 9 For j = 1 To i Print j; *; i; =; i * j; If j = 2 And (i = 3 Or i = 4) Then Print ; End If Next j Print Next iEnd Sub运行图示：