VB编写一个程序

来源:百度知道 编辑:UC知道 时间:2024/06/16 03:47:18
那位高手帮我写一个程序代码:
使用FOR循环输出3行10列的*

Private Sub Command1_Click()
Dim a As String
Dim h As Long
Dim i As Long
a = "*"
For h = 1 To 10
a = a + "*"
Next
For i = 1 To 3
Print a
Next
End Sub

for i=1 to 3
for j=1 to 10
print "*"
next j
next i

Dim i as integer
Dim j as integer//先定义两个整型变量用于循环

for i=0 to 2
for j=0 to 9
print "***"
next j
next i

for i=1 to 3
for j=1 to 10
print "*";
next
print
next