来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/23 19:39:01
VB编程(用循环)
输出下列图形
A
BBB
CCCCC
DDDDDDD
Private Sub Command1_Click()
a = -1: b = 5
For i = 65 To 68
a = a + 2: b = b - 1
Print Space(b);
For j = 1 To 7
Print Chr(i);
If j = a Then Exit For
Next j
Print vbCrLf
Next i
End Sub
完全符合你的要求!