VB
1.在多窗体的应用程序中，当前窗体模块的Form_Click事件过程中包含如下语句，单击该窗体，其中_____
一定可以将Hello显示在当前窗体上。
A.Form2.Print  "Hello"
B.Me.Print  "Hello"
C.Form1.Print  "Hello"
D.Debug.Print  "Hello"
【参考答案】    B
2.下列说法错误的是________。
A.产生0.01至100.99范围内的随机数，包括两端点，间隔为0.01的表达式可写成Myvalue=Int(1
01.98*Rnd+0.01)
B.Print String$(3,65)的运行结果是AAA,Print Asc(“Basic”)的结果是66
C.25\3 Mod 3.2 *Int(2.5) 的值是2
D.表达式5 \ 3 / Asc("c") * Fix(44.2) * CInt(7.8 - 5.2) 的值是1
【参考答案】    A
3.以下说法不正确的是____________。
A.Val( )函数用来把自变量字符串转换为数值
B.Log( )函数产生一个0-1之间的单精度浮点数
C.Chr＄( )函数的作用是把自变量表达式的值转换为相应的ASCII码
D.Rnd( )函数产生一个0-1之间的单精度浮点数
【参考答案】    C
4.下面____________是不合法的整常数。
A.100
B.&O100
C.&H100
D.%100
【参考答案】    D
5.下列可以将变量A、B互换的语句是____________。
A.A=B: B=C: C=A
B.A=A+B: B=A-B: A=A-B
C.A=(A+B)/2: B=(A-B)/2
D.A=C: C=A
【参考答案】    B
6.下列程序段的输出结果是____________。
Dim i As Integer
Dim a(8) As Integer
y = 18: i = 0
Do
a(i) = y Mod 2
i = i + 1
y = y \ 2
Loop Until y < 1
For j = i - 1 To 0 Step -1
Print a(j);
Next j
A.1 0 0 1 0
B.0 0 1 1 0
C.1 0 1 0 0
D.1 0 0 0 0
【参考答案】    A
7.通用过程可以完成一项指定任务，必须由__________调用才行。
A.定时器
B.Sub Main
C.系统引发
D.应用程序
【参考答案】    D
8.有一个充满氢气的球，如果人不小心松开手抓的引线，它就会飞走；如果用针刺穿它，它则会爆破。此处红一种属性，飞是一种_____。
针刺是一种_____，爆破是一种_____。
【参考答案】
方法
【参考答案】
事件
【参考答案】
方法
9.下面的程序用"冒泡"法将数组a中的10个整数按升序排列，请将程序补充完整。
Option Base 1
Private Sub Command1_Click( )
Dim a,i,j,k As Integer
a=Array(678,45,324,528,439,387,87,875,273,823)
For i=_____
For j=_____
If a(i)_____a(j) Then
a1=a(j):a(j)=a(i):a(i)=a1
End If
Next j
Next i
for k=1 To 10
Print a(k);
Next k
End Sub
【参考答案】
1 to 9
1  To  9
1 to 10
1 to  10
1 To Ubound(a)-1
【参考答案】
i+1 to 10
i + 1 to 10
i+1 TO  10
1+i to 10
【参考答案】
>=
>
10.下列函数调用时弹出的对话框中按钮的个数为_____。
MsgBox ("程序非法！",vbAbortRetryIgnore,"消息提示")
【参考答案】
3
3个
11.表达式Fix(-48.65)+Int(-52.15)的值是_____。
【参考答案】
-101
12.能正确产生[1,30]之间的随机整数的表达式是_____。
【参考答案】
Int(Rnd()*30)+1
Int(Rnd*30)+1
x=Int(Rnd*30+1)
Int(30*Rnd)+1
int(Rnd*(30)+1)
int(rnd*30+1)
Int((30*Rnd)+1)
x=Int(Rnd*30)+1
int(rnd *30) +1
int(rnd*30) + 1
Int(30-1+1)*Rnd)+1
Int((Rnd*30)+1)
Int((30-1+1)*Rnd)+1
Int(30*rRnd)+1
x=int(rnd*(30-1+1))+1
下列属于vb字符串函数是Int(Rnd*(30-1+1)+1)
Int(30 * Rnd) + 1
int(Rnd*(30-1+1))+1
Int(30*Rnd+1)
a=Int(Rnd*30)+1
1+Int(rnd*30)
Int((30)*Rnd)+1
x=Int(Rnd*(30))+1
Int(Rnd(30) +1)
13.当程序执行过程中发生无限循环（死循环）时，可以按组合键_____终止程序。
【参考答案】
Ctrl+Break
Crtl+Break
14.InputBox函数返回值的类型为_____。
【参考答案】
字符串型
字符串
字符串类型
字符型
string
字符窜型
15.InputBox函数返回值的类型为_____。
【参考答案】
字符串型
字符串
字符串类型
字符型
string
字符窜型

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。