填空题
执行下面程序,第一行输出结果是
(11)
,第二行输出结果是
(12)
。
Option Explicit
Private Sub Form_Click()
Dim A As Integer
A=2
Call Subl(A)
End Sub
Private Subl(x As Integer)
x=x*2+1
If x<10 Then
Call Subl(x)
End If
x=x*2+1
Print x
End Sub
【参考答案】
47
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
能够将文本框控件隐藏起来的属性是______。
点击查看答案&解析
填空题
下列程序的功能是:将数据1,2,…,10写入顺序文件Base.txt中,请填空。Private Sub Form_Click()Dim i As IntegerOpen ______ As #1For i=1 To 10Prin t#1,iNextClose #1End Sub
点击查看答案&解析
相关试题
a(i) mod 5
(Rnd*99)+1