单项选择题
有如下事件过程,单击命令按钮扣,输出结果是( )。 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 Function
A.私有成员
B.保护成员
C.公有成员
D.所有成员
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
如下事件过程:Function Feed(x)If x <10 ThenFeed=XElseFeed=10+xEnd IfEnd FunctionPrivate Sub Command1_Click( )x=Val(Input Box( ,0))pay=Feed(x)Print payEnd Sub运行时在输入框内输入变量x的值为15,输出结果为( )。
A.0
B.15
C.25
D.30
点击查看答案&解析
单项选择题
单击命令按钮时,下列程序的执行结果是( )。Private Sub Command1_Click()Dim a As Integer,b As Integer,C As Integera=3b=4c=5Print SecProc(c,b,a)End SubFunction FirProc (x As Integer,y As Integer,z As Integer)FirProc=2 * x + y + 3 * z+2End FunctionFunction SecProc (x As Integer,y As hteger,z As Integer)SecProc=FirProc(z,x,y)+x+7End Function
A.13
B.16
C.36
D.33
点击查看答案&解析
相关试题
如果存在如下过程:Private Function FMa...
要使标签的背景样式为不透明,应将BackStyl...
下述语句段在运行时的显示结果是【 】。Ci...
在E盘当前目录文件夹下建立一个名为“Stude...
执行下面的程序段,x的值为【 】。 Priva...