Private Sub Command1_Click() Dim i,j As Integer For i = 3 To 1 Step -1 Print Spc(5); For j = 1 To 2Private Sub Command1_Click()Dim i,j As IntegerFor i = 3 To 1 Step -1Print Spc(5);For j = 1 To 2 * i - 1Print "*";nextjPrintNext iEnd Sub请问它为什
来源:学生作业帮助网 编辑:六六作业网 时间:2024/11/17 03:52:16
Private Sub Command1_Click() Dim i,j As Integer For i = 3 To 1 Step -1 Print Spc(5); For j = 1 To 2Private Sub Command1_Click()Dim i,j As IntegerFor i = 3 To 1 Step -1Print Spc(5);For j = 1 To 2 * i - 1Print "*";nextjPrintNext iEnd Sub请问它为什
Private Sub Command1_Click() Dim i,j As Integer For i = 3 To 1 Step -1 Print Spc(5); For j = 1 To 2
Private Sub Command1_Click()
Dim i,j As Integer
For i = 3 To 1 Step -1
Print Spc(5);
For j = 1 To 2 * i - 1
Print "*";
nextj
Print
Next i
End Sub
请问它为什么错了?VB弹出提示框说过程或子程序未定义.
Private Sub Command1_Click() Dim i,j As Integer For i = 3 To 1 Step -1 Print Spc(5); For j = 1 To 2Private Sub Command1_Click()Dim i,j As IntegerFor i = 3 To 1 Step -1Print Spc(5);For j = 1 To 2 * i - 1Print "*";nextjPrintNext iEnd Sub请问它为什
代码写错了
nextj 改为next j
中间要有空格,或者你直接写next