
二级VB疑问
对于这道题我彻底无语,完全看不懂,希望各位大侠给小弟一些指点,万分感谢!在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:PrivateSub...
对于这道题我彻底无语,完全看不懂,希望各位大侠给小弟一些指点,万分感谢!
在窗体上画一个命令按钮(其Name属性为Command1), 然后编写如下代码:
Private Sub Command1-Click()
Dim a(5)
For i=0 to 4
a(i)=i+1
t=i+1
If t=3 Then
Print a(i);
a(t-1)=a(i-2)
Else
a(t)=a(i)
End If
If i=3 Then a(i+1)=a(t-4)
a(4)=1
Print a(i);
Next i
End Sub
很急啊,麻烦高手给我讲解一下!谢谢了! 展开
在窗体上画一个命令按钮(其Name属性为Command1), 然后编写如下代码:
Private Sub Command1-Click()
Dim a(5)
For i=0 to 4
a(i)=i+1
t=i+1
If t=3 Then
Print a(i);
a(t-1)=a(i-2)
Else
a(t)=a(i)
End If
If i=3 Then a(i+1)=a(t-4)
a(4)=1
Print a(i);
Next i
End Sub
很急啊,麻烦高手给我讲解一下!谢谢了! 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询