x=”A” : y=”B” : z=”C” For i =1 To 2 x=y : y=z : z=x Next i
Text1.Text=x+y+z End Sub
单击按钮后，文本框显示的结果是 （ ） A. ABC B. BCA C. BCB D. CBC
34.表示条件“身高T超过1.7米且体重W小于62.5千克”的逻辑表达式是 （ C ） A. T>=1.7 And W<=62.5 B. T<=1.7 Or W>=62.5 C. T>1.7 And W<62.5 D. T>1.7 Or W<62.5
35.要强制显式声明变量，可在窗体模块或标准模块的通用声明段中加入语句 （ B ） A. Option Base B. Option Explicit C. Option Base 1 D. Option Compare
36.下列数据中 是Boolean型常量（ C ） A. 123 B. And C. True D. Or
37.阅读下面程序，选择正确的结果。 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
38.程序在运行循环For i=1 to 14 Step 3结束后，i的值等于 （ B ） A. 16 B. 13 C. 14 D. 15
39.下面的运算符中优先级最高的是 （ D ） A. Not B. \\ C. < D. *
40.当VB执行下面语句后，A的值为 A=1
If A>0 Then A=A+1 If A>1 Then A=0（ ） A. 0 B. 1 C. 2 D. 3
41.如果希望用变量X来存放数据1234.5678912，应将X定义为 类型（ B ） A. 单精度型 B. 双精度型 C. 长整型 D. 字符型
42.运行下面程序，单击窗体后在窗体上显示的内容是 Private Sub Form_Click() Dim x As Integer, y As Integer x = 1: y = 0 Do While x < 3 x = x + 1 y = x + y Loop Print x; y End Sub（ ） A. 1 0 B. 3 3 C. 5 3 D. 3 5
43.下面程序段的执行结果为 。 Dim M(10),N(10) i=3
For t= 1 to 5 M(t)=t N(i)=2*i+t Next t
Print N(i);M(i) （ ） A.3 11 B.3 15 C.11 3 D.15 3
44.系统默认的参数传递方式是 传递。（ A ） A.按地址 B.按值 C.按形参 D.按实参
45.以下叙述中正确的是 。（ A ） A.组合框包含了列表框的功能 B.列表框包含了组合框的功能
C.列表框和组合框的功能无相近之处 D.列表框和组合框的功能完全相同
46.建立一个俱乐部会员信息输入界面，要求选择会员的性别、职业(工程师、公务员、教师、医生、其他)及爱好(共10种，如一个人既喜欢足球，又喜欢旅游)。应如何在窗体上如何实现 。（ D ）
A.用一组17个复选框来实现
B.将10种爱好用一组10个复选框来实现，性别和职业用7个单选按钮来实现 C.将10种爱好用一组10个单选按钮来实现，性别和职业用7个复选框来实现
D.将10种爱好用一组10个复选框来实现，性别用2个单选按钮来实现，职业用一个框架和5个单选按钮来实现
47.要使控件和框架捆绑在一起，以下操作正确的是 。（ C ）
A.在窗体不同位置上分别画一个框架和控件，再将控件拖动到框架上 B.在窗体上画好控件，再画框架将控件框起来 C.在窗体上画好框架，再在框架上画控件
D.在窗体上画好框架，再双击工具箱中的控件
48.应用列表框List1最后一个选项应使用表达式 。（ B ） A.List1.List(List1.ListCount) B.List1.List(List1.ListCount-1) C.List1.List(ListCount) D.List1.List(ListCount-1)
49.设置一个单选按钮所代表选项的选中状态，应当在属性窗口中改变的属性是 。（ C ） A.Caption B.Text C.Value D.Name
50.为了使图片框和图像框的大小适应图片的大小，下面设置中正确的是 。（ A ） A.AutoSize=True Stretch=True B.AutoSize=True Stretch=False C.AutoSize=False Stretch=True D.AutoSize=False Stretch=False
51.当滚动滚动滑块时，将触发滚动框的 事件。（ B ） A.Move B.Change C.Scroll D.Getfocus
52.将数据项“China”添加到列表框(List1)中成为第一项应使用 。（A ）
A.List1.Additem “China”,0 B.List1.Additem “China”,1 C.List1.Additem 0, “China” D.List1.Additem 1, “China”
53.在窗体上用复制、粘贴的方法建立一个命令按钮数组，数组名为M1，设窗体Form1标题为“MyForm1”，双击控件数组中的第三个按钮，打开代码编辑器，写下如下代码： Private Sub M1_Click(Index As Integer) Form1.Caption=”Myform2” End Sub
运行时，单击控件数组中的第一个按钮，则窗体标题为 。（ ） A.Form1 B.M1
C.Myform1 D.Myform2
54.下列 属性决定了水平滚动条产生的数值范围。（ B ） A.Height B.Max C.Width D.Top
55.要使每次单击滚动条两端滚动按钮时变化值为10，应设置 属性。（ A ） A.SmallChange B.MinChange C.MaxChange D.LargeChange
56.课用于设置系统当前时间的语句是 。（ C ） A.Date B.Year C.Time D.Timer
57.SetFocus方法是把焦点移到指定对象上，使对象获得焦点，该方法适用于所有控件。（ B ） A.对 B.错
58.在程序运行中，标签和文本框都可以用来输入数据。（ B ） A.对 B.错
59.组合框和列表框一样，都可以在运行时输入文本。（ A ） A.对 B.错
60.方法是由Visual Basic提供的一种专门的子程序，由对象本身所具有，反映该对象功能的内部函数或过程。（ A ） A.对 B.错
61.将定时器的时间间隔设置为1秒，那么定时器的Interval属性值应设为1。（ A ） A.对
B.错
62.要从Function过程中退出，使用 Exit Do语句。（ B ） A.对 B.错
63.一个VB工程文件包含窗体文件、标准模块文件、类模块文件等。（ A ） A.对 B.错
64.在Visual Basic中通过Forecolor 属性来设置字体颜色。（ A ） A.对 B.错
65.复选框的Value属性用于决定该复选框是否被选中。（ A ） A.对 B.错
66.列表框的ListIndex返回当前选项的索引号，索引号从1开始。如果没有选项被选中，该属性为2。（ B ） A.对 B.错
67.将命令按钮Command1设置为不可见，应修改该命令按钮的Visible 属性。（ A ） A.对 B.错
68.声明形参时以缺省传递方式声明，则为按值传递(Byval)。（ B ） A.对 B.错
69.标签(Label)控件的AutoSize属性值为True时，标签的宽度、高度会自动调整以显示标签中所有的内容。（ A ） A.对 B.错
70.决定对象是否可见的属性是Enabled属性，决定对象可用性的属性是Visible属性。（ B ） A.对 B.错
71.组合框和文本框一样均没有Caption属性，但都具有Text属性。（ A ） A.对 B.错
72.函数MsgBox的3个参数分别是输入对话框的提示信息、默认值以及标题。（ A ） A.对 B.错
73.在循环体内，循环变量的值不能被改变。（ A ） A.对 B.错
74.子程序定义时使用Private表示此子程序只可以被本工程中的其他过程调用。（ B ） A.对 B.错
75.使用a=b:b=a 语句可以将变量A和B的值互换。（ B ） A.对