填空题

执行下面程序，第一行输出结果是 【14】 ，第二行输出结果是47。
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

【参考答案】

W
<上一题 目录 下一题>
热门 试题

填空题
已知B的ASCII码为66，以下程序统计由键盘输入的字符串中各英文字母的使用次数 Dim pp (65 To 90) For i = 65 To 90 pp(i) =0 Next x$ = InputBox( Enter a string , x$ ) x$ = UCase$ (x$) For i = 1 To Len (x$) n =Asc(Mid$ (x$, i, 1) ) If n＞= 65 And n＜ = 90 Then 【11】 End If Next For i = 65 To 90 Ifpp(i)＞0Then Print Chr$ (i) ; pp (i) End If Next
填空题
数据库保护分为：安全性控制、 【5】 、并发性控制和数据的恢复。
相关试题