在窗体上画一个命令按钮(其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


相关考题:

在窗体上添加一个命令按钮(名为Commandl),然后编写如下程序:打开窗体运行后,单击命令按钮,消息框的输出结果为__________。

在窗体上画一个命令按钮,其名称为Commandl,然后编写如下事件过程:程序运行后,单击命令按钮,其输出结果为__________。

在窗体(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

在窗体上画一个命令按钮,其名称为Commandl,然后编写如下事件过程:程序运行后,单击命令按钮,消息框输出的是系统当前日期和当前时间。

在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程:运行程序,单击命令按钮,则在弹出的信息框的标题栏中显示的是__________。

在窗体上画两个文本框(Name属性分别为Textl和Text2)和一个命令按钮(Name属性为Commandl),然后编写如下事件过程:A. 1和0B. 2和72C. 3和50D. 4和168

在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程:程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A)机床B)车床C)钻床D)轴承

在窗体(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)中分别输入“同学们,”和“你们好”,然后单击命令按钮,则输出结果为多少?