添加个按扭，并填写以下事件：Private Sub Command1_Click()ClsFor i = 1 To 9For j = 1 To i Print j & "*" & i & "=" & i * j & " ";Next jPrintNext iEnd Sub
