单项选择题
设有如下程序:
Private Static Function Fac(n As Integer)As Integer
Dim f As Integer
f=f+n
Fac=f
End Function
Private Sub Form_Click( )
Dim I As Integer
For 1=2 To 3
Print"#";I&“=”&Fac(1)
Next I
End Sub
程序运行后,单击窗体,在窗体上显示的是
A.#2=2
#3=3
B.#2=2
#3=5
C.#;2=2
#;3=3
D.#;2=2
#3;=5
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
单击命令按钮时,下列程序的运行结果为 Private Sub Command1_Click( ) Print MyFund(20,18) End Sub Public Function MyFund(m As Integer,n As Integer)As Integer Do While m◇n Do While m>n:m=m-n:Loop Do While m<n:n=n-m:Loop Loop MyFund=m End Function
A.0
B.2
C.4
D.6
点击查看答案&解析
单项选择题
单击按钮时,以下列程序运行后的输出结果是 Private Sub proc1(x As Integer,y As Integer,z As Integer) x=3*z y=2*z z=X+y End Sub Private Sub Command1_Click( ) Dim x As Integer,y As Integer,z As Integer x=1:y=2:z=3 Call proc1(x,x,2) Print x;x;z Call proc1(x,y,y) Print x;y;y End Sub
A.6 6 12
6 6 10
B.9 5 10
5 10 10
C.9 6 12
9 10 15
D.9 5 10
5 4 10
点击查看答案&解析
相关试题
设在工程中有一个标准模块,其中定义了如下...
在窗体中添加一个名称为Lablel1的标签、两...
程序是一个窗体双击事件代码,窗体的名称是...
建立随机文件TEST.DAT,存放学生的姓名和...
数据库是指按照一定的规则存储在计算机中的...