有如下事件过程，单击命令按钮扣，输出结果为

Private Sub Command1_Click（）

D．im b%（1 To 4） , j%, t#

F．or j=1 To 4

b（j） =j

Next j

t=Tax（b（） ）

Print "t="; t,

E．nd Sub

F．unction Tax （a（） As Integer）

D．im t#, i%

t=1

F．or i=2 To UBound（

A．

t=t * a（i）

Next i

Tax=t

E．nd Function（ ）。

A．t＝18

B．t＝24

C．t＝30

D．t＝32

[单选题]有如下事件过程，单击命令按钮扣，输出结果是 Private Sub Command1 Click( ) Dim b% (1 To4) ,j%, t# For j=1 To 4 b(j) =j Next j t=Tax(b( ) ) Print "t="; t, End Sub Function Tax (a( ) As Integer) Dim t#, i% t=1 For i=2 To UBound (A)t=t * a(i) Next i Tax=t End FunctionA．t=18

[单选题]单击命令按钮，下列事件过程的执行结果为Private Sub Command1_Click（）D．im x As Integer, y As Integerx=40: y=72C．all PtoP（x, y）Print x; yE．nd SubPublic Sub PtoP（Byval n As Integer, ByVal m As Integer）n=n ＼ 10+2m=m ＼ 10+2E．nd Sub（ ）。A．0 8B．40 72C．4 50D．78 50

[单选题]有如下的程序：单击命令按钮后，输出结果为：（ ）A．2 2B．4 4C．5 5D．6 6

[单选题]窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是 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

[单选题]窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是( )。Private Sub Command1_Click()D．im aa=Array(1,2,3,4,5)F．or k=1 To 4S=s+a(k)Next kPrint sE．nd 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

[单选题]窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是。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 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（）D．im x As Integer, y As Integerx=32: y=42C．all PCS（x, y）Print x; yE．nd SubPublic Sub PCS（Byval n As Integer, ByVal m As Integer）n=n Mod 10+1m=m Mod 10+1E．nd Sub （ ）。A．32 42B．2 32C．2 3D．12 3

[单选题]单击命令按钮时，下列的执行结果为Private Sub Command1_Click（）D．im x As Integer, y As Integerx=86: y=29C．all Proc（x, y）Print x; yE．nd SubPublic Sub Proc（n As Integer, ByVal m As Integer）n=n Mod 10m=m Mod 10E．nd Sub（ ）。A．12 32B．6 29C．2 3D．12 3