下面程序运行后,单击命令按钮,输出的结果是Private Sub Command1_Click()Dim a%(1 To 4) , b%(2 To 6) , i%, str1#, str2#For i=1 To 4a(i)=iNextFor i=2 To 6b(i)=iNextstr1=YAG(a)str2=YAG(b)Print "str1="; str1; "str2="; str2End SubFunction YAG(a() As Integer)Dim t#, i%t=1For i=LBound(a) To UBound(a)t=t * a(i)NextYAG=tEnd FunctionA.str1=24 str2=720B.str1=12 str2=360C.str1=24 str2=180D.str1=36 str2=720

下面程序运行后,单击命令按钮,输出的结果是

Private Sub Command1_Click()

Dim a%(1 To 4) , b%(2 To 6) , i%, str1#, str2#

For i=1 To 4

a(i)=i

Next

For i=2 To 6

b(i)=i

Next

str1=YAG(a)

str2=YAG(b)

Print "str1="; str1; "str2="; str2

End Sub

Function YAG(a() As Integer)

Dim t#, i%

t=1

For i=LBound(a) To UBound(a)

t=t * a(i)

Next

YAG=t

End Function

A.str1=24 str2=720

B.str1=12 str2=360

C.str1=24 str2=180

D.str1=36 str2=720


相关考题:

窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是。Private Sub Command1_Click()Dim aa = Array(1,2,3,4,5)For K = 1 To 4 S = S + a(K)Next K Print SEnd SubA. 10 B. 14 C. 15 D. 120

窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是 Private Sub Commandl_Click() Dim a a=Array(1,2,3,4,5) Fork=1 To 4 s=s+a(k) Next k Print s End Sub A.10 B.14 C.15 D.120

(19)窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是 。 Private Sub Commandl_Click() Dim a a=Array(1,2,3,4,5) For k=1 To 4 S=S+a(k) Next k Print S End SubA.10 B.14 C.15 D.120

窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是( )。Private Sub Command1_Click()Dim aa=Array(1,2,3,4,5)For k=1 To 4S=s+a(k)Next kPrint sEnd SubA.10B.14C.15D.120

窗体上有一个命令按钮,命令按钮的单击事件过程如下: Private Sub Command1_Click() Dim a a=Array(1,2,3,4,5) For k=1 To 4 s=s+a(k) Next Print S End Sub 运行程序后,单击命令按钮,输出结果是A.10B.14C.15D.120

在窗体上添加一个命令按钮,名为Command1,事件过程如下:程序运行后,单击命令按钮,依次在输入对话框中输入5、4、3、2、1、-1后,输出的结果是______。A.5B.4C.3D.2

窗体上有一个命令桉钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是( )。Private Sub Command1_click()Dim aa=Array(1,2,3,4,5)Fork=1 To 4S=S+a(k)Next kPrint SEnd SubA.10B.14C.15D.120

窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是 Private Sub Command1_Click( ) Dim a a = Array(1,2,3,4,5) For k = 1 To4 s=s+a(k) Next Print S End SubA.10B.14C.15D.120

窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是( )。 Private Sub Command1_Click() Dim a a=Array(1, 2, 3, 4, 5) Fork= 1 To 4 s=s+a(k) Next k Print s End SubA.10B.14C.15D.120

在窗体上画一个名为Command1的命令按钮,编写如下程序:程序运行后,单击命令按钮,输出的结果是_________。