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