真题答案

n=1234
D)Text1="123"
39.如果要在文本框中输入字符时，只显示某个字符，如星号（*），应设置文本框的 B 属性。
A)Caption
B)PassWordChar
C)Text
D)Char
40.有如下程序：
m＄="ABC"
n＄="abc"
k＄=LCase＄(m＄)
j＄=UCase＄(n＄)
Print Asc(k＄+j＄)
End
运行后输出的结果是 D 。
A）abcabc
B）ABCABC
C）65
D）97
41.有如下程序：
a=6;b=8
F=Sqr(a*a+b*b)
Print F
运行后输出的结果是 C 。
A）6
B）8
C）10
D）14
42.有如下程序：
Dim a As String,b As String
a="12345",b="abcde"
For i=1 To 5
c=c+Left(a,i)+Right(b,i)
Next i
Print c
运行后输出的结果是 D 。
A)a1b2c3d4e5
B)1a2b3c4de5
C)e1d2c4b5e1d2c3b4a5
D)1e12de123cde1234bcde12345abcde
43.下面表达式中， D 的运算结果与其他3个不同。
A)log(Exp(-3.5))
B)Int(-3.5)+0.5
C)-Abs(-3.5)
D)Sin(30*3.14/180)
44.设m，n是整数，且n>m,在以下4个语句中，能将x赋值为一个m～n之间（含m，n）任意整数，即满足n≥x≥m的是 C 。
A）X=INT（RND*（N-M+1））+M
B）X=Int(Rnd*n)+m
C)X=Int(Rnd*m)+n
D)X=Int(Rnd*(n-m)+m
45.在以下4个逻辑表达式中，其逻辑值为"真"的是 D 。
A）Not (3+4<4+6)
B）2>1 And 3<2
C)1>2 Or 2>3
D)Not (1>2)
46.执行以下程序段后，变量C＄的值为 D 。
A＄="Visual Basic Programing"
B＄="Quick"
C＄=B& & Ucase(Mid&(A&,7,6)) & Right&(A$,11)
A)Visual BASIC Programing
B)QuickBasic Programing
C)QUICK Basic Programing
D)Quick BASIC Programing
47.语句X=X+1的正确含义是 C 。
A）变量X的值与X+1的值相等
B）将变量X的值存到X+1中去
C）将变量X的值加1后赋给变量X
D）变量X 的值为1
48.代数式ex Sin(30)2x/(x+y)ln x对应的Visual Basic表达式是 C 。
A）X=E^X*Sin(30*3.14/180)*2*x/x+y*Log(x)
B）X=Exp(x)*Sin(30)*2*x/(x+y)*Ln(x)
C）X=Exp(x)*Sin(30*3.14/180)*2*x/(x+y)*Log(x)
D）X=Exp(x)*Sin(30*3.14/180)*2*x/(x+y)*Ln(x)
49.如下程序：
Private Sub Form_Click()
a=20:b=20:c=120:d=120
Form.Line(a,b)-(c,d),,BF
End Sub
单击窗体后，窗体上显示的是 C 。
A）一条直线
B）一个矩形空框
C）一个填充了颜色的矩形
D）无任何图形
50.运行以下程序后，输出的图案是 A 。
Forml.Cls
For A=1To5
Print Space(5-A);String(A, "*")
Next A
A) *
* *
* * *
* * * *
* * * * *

B) *
* *
* * *
* * * *
* * * * *
C)*
* *
* * *
* * * *
* * * * *
D)*
* *
* * *
* * * *
* * * * *
51.运行下面程序段可以显示 B 中的图形。
Forml.Cls
For k=1To5
Print Tab(10-k)
For m=1 To 2*k-1
Print "%";
Next m
Print
Next k
A) %
%%%
%%%%%
%%%%%%%
B)%
%%%
%%%%%
%%%%%%%
%%%%%%%%%
C)%%%%%%%%%
%%%%%%%

%%%%%
%%%
%
D)%%%%%%%%%
%%%%%%%
%%%%%
%%%
%
52.下述程序的运行结果是 B 。
For m=3 To1 Step-1
x＄=String＄(m,"#")
Print x＄
Next