Text1.Text=Str(n) End Sub
单击按钮后，文本框显示的结果是 （B ） A. 2 B. 3 C. 4 D. 5
33.以下的程序运行后，窗体中显示的结果是 Private Sub Form_Click() a = 360
b = a \\ 100 + a Mod 100 + (a Mod 10) *100 Print b End Sub（ ） A. 63 B. 063 C. 360 D. 36
34.语句X=X+1的正确含义是 （C ） A. 变量X的值与X+1的值相等 B. 将变量X的值存到X+1中去 C. 将变量X的值加1后赋给变量X D. 变量X的值为1
35.下列关于Select Case的叙述中，错误的是 （ ） A. Case 10 To 100 表示判断Is是否介于10与100之间
B. Case \表示判断Is是否和\、\两个字符中的一个相同 C. Case \表示判断Is是否为大写字母X
D. Case –7,0,100 表示判断Is是否等于字符串\36.阅读下面程序，选择正确的结果。 Private Sub Command1_Click() Dim A
For J=1 to 10 A=J^2 Next J Print A;J^2 End Sub
上面程序执行后，输出J^2的值为 （ ） A. 0 B. 1 C. 100 D. 121
37.在窗体中放置一个命令按钮Command1和一个文本框Text1，并编写如下程序： Private Sub Command1_Click() Dim i As Integer For i=0 To 50
i=i+3
If i>10 Then Exit For Next i Print i End Sub
单击按钮后，窗体上显示的是 （ ） A. 9 B. 10 C. 11 D.12
38.把字符串\转换为数值123时应该使用的函数是 （ B ） A. St B. Val C. Len D. Rnd
39.函数Int(Rnd*20)是在 范围内的整数（B ） A. (0,2） B. (1,20） C. (0,19） D. (1,9）
40.运行下面程序： Private Sub Form_Click() a = 1 b = 1
N = InputBox(\For I = 2 To N Step 1 c = a + b a = b b = c Next
Form1.Cls Print b End Sub
单击窗体输入3后，窗体上的显示结果为： （ ） A. 1 B. 3 C. 5 D. 7
41.关于多分支结构的Case语句，下列写法中错误的是 。（C ） A. Case 1,5,Is>10 B. Case 0 to 10
C. Case Is>10 And Is <50 D. Case Is>10
42.下列 是日期常量（C ）
A. “2/1/02” B. 2/1/02 C. #2/1/02# D. {2/1/02}
43.下列控件中，没有Caption属性的是 。（ B ） A.框架 B.列表框 C.复选框 D.单选按钮
44.语句Print Sgn(-3^2)+Abs(-3^2)+Int(-3^2)运行时输出的结果为 。（ D） A.17 B.27 C.1 D.-1
45.要使控件和框架捆绑在一起，以下操作正确的是 。（C ）
A.在窗体不同位置上分别画一个框架和控件，再将控件拖动到框架上 B.在窗体上画好控件，再画框架将控件框起来 C.在窗体上画好框架，再在框架上画控件
D.在窗体上画好框架，再双击工具箱中的控件
46.为了使图片框和图像框的大小适应图片的大小，下面设置中正确的是 。（A A.AutoSize=True Stretch=True B.AutoSize=True Stretch=False C.AutoSize=False Stretch=True D.AutoSize=False Stretch=False
47.要访问数组中的所有元素，通常会使用 。（ D ） A.For…Next
B.Do…While Loop C.For Each…Next D.A和C
48.阅读下面的程序，选择运行结果 。 Option Base 1
Private Sub Form1_Load()
Dim a(10) As Integer, p(3) As Integer Dim i As Integer, k As Integer K=5
For i=1 to 10 a(i)=i Next
For i=1 to 3 P(i)=a(i*i) Next
For i=1 to 3 K=k+p(i)*2 Next
） Print k
End Sub（ C ） A.35 B.28 C.33 D.37
49.在窗体上用复制、粘贴的方法建立一个命令按钮数组，数组名为M1，设窗体Form1标题为“MyForm1”，双击控件数组中的第三个按钮，打开代码编辑器，写下如下代码： Private Sub M1_Click(Index As Integer) Form1.Caption=”Myform2” End Sub
运行时，单击控件数组中的第一个按钮，则窗体标题为 。（ D ） A.Form1 B.M1
C.Myform1 D.Myform2
50. 控件的行为具有Boolean类型。（ C） A.单选按钮、命令按钮 B.复选框、标签 C.单选按钮、复选框 D.列表框、组合框
51.以下叙述中正确的是 。（A ） A.组合框包含了列表框的功能 B.列表框包含了组合框的功能
C.列表框和组合框的功能无相近之处 D.列表框和组合框的功能完全相同 52.下面程序段的执行结果为 。 Dim M(10),N(10) i=3
For t= 1 to 5 M(t)=t N(i)=2*i+t Next t 你 A.3 11 B.3 15 C.11 3 D.15 3
53.下面 语句声明的数组不是动态数组。（ B ） A.Dim X() B.Dim X(5) C.ReDim X(10) D.以上都不是
54.把字符串“123”转换成数值123时应该使用的函数是 。（ C ）
A.Str B.Len C.Val D.Rnd
55.当组合框的Style属性设置为2时，其表现形式是 。（B ） A.下拉列表框 B.下拉组合框 C.简单组合框 D.文本框
56.以下关于单选按钮的说法，正确的是 。（ B ）
A.一个窗体上包括其他容器中的所有单选按钮一次只能有一个被选中 B.一个窗体上不包括其他容器中的所有单选按钮一次只能有一个被选中 C.在一个容器中的单选按钮可以同时有多个被选中
D.所有容器多于一个的单选按钮一次只能有一个被选中 57.用关键字Public声明的过程可以被其他模块调用。（ A ） A.对 B.错
58.For/Next语句中，循环控制变量只能是整形变量。（ ） A.对 B.错
59.在Do循环结构中，While和Until关键字的作用是相反的。（ ） A.对 B.错
60.用窗体的Caption属性可以设置窗体的标题。（ A ） A.对 B.错
61.用DIM定义数值变量时，该数值变量自动赋初值为0。（ B ） A.对 B.错
62.在行If语句中，关键字End If 是必不可少的。（ B ） A.对 B.错
63.用Do循环既能设计出预先知道循环次数的循环，也能设计出预先不知道循环次数的循环。（ ） A.对 B.错
64.一个表达式中若有多种运算，在同一层括号内，计算机按函数运算→关系运算→逻辑运算→算术运算的顺序对表达式求值。（ B ） A.对 B.错
65.让复选框不可用，可设置其Enabled属性为False或设置Value属性为2。 （ A ） A.对 B.错
66.不能用Do循环设计出预先知道循环次数的循环。（ B ）