在窗体上画一个命令按钮(其Name属性为Commandl),然后编写如下代码:Private Sub Commandl_Click()Dima(5)Fori=0 To 4A(i)=i+1t=i+1If t=3 ThenPrint a(i)A(t-1)=a(i-2)ElseA(t)=a(i)End IfIfi=3 Thena(i+1)=a(t-4)A(4)=1Printa
在窗体上画一个命令按钮(其Name属性为Commandl),然后编写如下代码:
Private Sub Commandl_Click()
Dima(5)
Fori=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
Ifi=3 Thena(i+1)=a(t-4)
A(4)=1
Printa
相关考题:
在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和 Text2)和一个命令按钮(Name属性为Commandl),然后编写如下两个事件过程: Private Sub Commandl Click() a=TextText+TextText Print a End Sub Private Sub Form. Load() TextText="" Text2.Text="" End Sub 程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入123和 321,然后单击命令按钮,则输出结果为 ( )A.444B.321123C.123321D.132231
在窗体上画两个文本框(Name属性分别为Textl和Text2)和一个命令按钮(Name属性为Commandl),然后编写如下事件过程:A. 1和0B. 2和72C. 3和50D. 4和168
在窗体(Name属性为Forml)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Commandl),然后编写如下两个事件过程: Private Sub Commandl_Click() a=Text1.Text+Text2.Text Printa End Sub Private Sub Form_Load() Text1.Text="" Text2.Text="" End Sub 程序运行后,在第一个文本框(A.165B.8778C.7788D.7887
在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程: 程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入“同学们,”和“你们好”,然后单击命令按钮,则输出结果为多少?