用vb 编写一个乘法口诀表 要求分别有四种三角形的形状
来源：学生作业帮助网 编辑：六六作业网 时间：2024/11/15 05:56:40
用vb 编写一个乘法口诀表 要求分别有四种三角形的形状
用vb 编写一个乘法口诀表 要求分别有四种三角形的形状
用vb 编写一个乘法口诀表 要求分别有四种三角形的形状
Private Sub Command1_Click()
For i = 1 To 9
For j = 1 To i
Print Tab(9 * (j - 1)); i & "x" & j & "=" & i * j;
Next
Print
Next
End Sub
Private Sub Command2_Click()
For i = 1 To 9
For j = i To 9
Print Tab(9 * (j - 1)); i & "x" & j & "=" & i * j;
Next
Print
Next
End Sub
Private Sub Command3_Click()
For i = 9 To 1 Step -1
For j = i To 9
Print Tab(9 * (j - 1)); i & "x" & j & "=" & i * j;
Next
Print
Next
End Sub
Private Sub Command4_Click()
For i = 9 To 1 Step -1
For j = 1 To i
Print Tab(9 * (j - 1)); i & "x" & j & "=" & i * j;
Next
Print
Next
End Sub