( 23 ) 在窗体上画一个命令按钮,名称为 Command1 ,然后编写如下代码:Option Base 0Private Sub Command1_Click()Dim A(4) As Integer,B(4) As IntegerFor k = 0 To 2A(k + 1) = InputBox(" 请输入一个整数 ")B(3 - k) = A(k + 1)Next kPrint B(k)End Sub程序运行后,单击命令按钮,在输入对话框中分别输入 2 、 4 、 6 ,输出结果为A ) 0B ) 2C ) 3D ) 4

( 23 ) 在窗体上画一个命令按钮,名称为 Command1 ,然后编写如下代码:

Option Base 0

Private Sub Command1_Click()

Dim A(4) As Integer,B(4) As Integer

For k = 0 To 2

A(k + 1) = InputBox(" 请输入一个整数 ")

B(3 - k) = A(k + 1)

Next k

Print B(k)

End Sub

程序运行后,单击命令按钮,在输入对话框中分别输入 2 、 4 、 6 ,输出结果为

A ) 0

B ) 2

C ) 3

D ) 4


相关考题:

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a S="VisualBasic" Print String(3, a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是______。A.VVVB.VisC.sicD.11

在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:

在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:Private Sub Commandl_Click( )Static X As IntegerStatic Y As IntegerClsY=1Y=Y+5X=5+XPrint X, YEnd Sub程序运行时,3次单击命令按钮Command1后,窗体上显示的结果为【 】。

在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click( ) a=12345 Print Format $(a,"000.00") End Sub 程序运行后,单击命令按钮,窗体上显示的是A.123.45B.12345.00C.12345D.00123.45

在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:程序运行后,如果单击命令按钮,则在面体上显示的内容是( )。

在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.B.HC.D.

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

在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() a = 12345 Print Format$(a, "000.00") End Sub 程序运行后,单击命令按钮,窗体上显示的是A. 123.45B.12345.00C.12345D.00123.45

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Privme Sub Command1_Click( ) a$="VisualBasic" Print String(3,a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是A.VVVB.VisC.sicD.11

在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:Private Sub Command1_Click()a = 12345Print Format$(a, "000.00")End Sub程序运行后,单击命令按钮,窗体上显示的是( )。A.123.45B.12345.00C.12345D.00123.45