1    标准控件不包括（ ）控件。
D(a) 驱动器列表框
(b) 目录列表框
(c) 文件列表框
(d) 通用对话框
2    当一个工程含有多个窗体时，它的启动窗体是（ ）。
D(a) 正在编辑的窗体
(b) 最后一个添加的窗体
(c) 第一个添加的窗体
(d) 在"；工程属性"；对话框中指定的窗体
3    VB应用程序在（ ）模式下不能编辑代码和设计界面。
A(a) 运行
(b) 中断
(c) 设计
(d) 以上均不能
4    下列叙述错误的是（ ）。
B(a) VB应用程序没有明显的开始和结束语句
(b) VB控件的所有属性值均可在属性窗口中设置
(c) VB是事件驱动型可视化编程工具   
(d) VB通过"；工具"；菜单的"；选项"；设置代码编辑窗口的字体大小
5    标准模块文件的扩展名是（ ）。
C(a) .cls
(b) .frm
(c) .bas
(d) .rec
6    下列叙述错误是（ ）。
D(a) 打开一个工程文件，系统自动装入与该工程有关的文件
(b) 保存VB程序时，应分别保存窗体和工程文件 
(c) 事件可以由用户触发，也可以由系统触发 
(d) VB应用程序只能以解释方式执行
7    在设计阶段，双击窗体上的某个控件，可以打开（ ）。
A(a) 代码窗口
(b) 属性窗口   
(c) 工具箱窗口
(d) 工程资源管理器窗口
8    下列叙述错误的是（ ）。
C(a) VB是可视化程序设计语言
(b) VB采用事件驱动编程机制 
(c) VB是面向过程的程序设计语言 
(d) VB应用程序可以以编译方式执行
9    下列叙述正确的是（ ）。
D(a) VB的事件由用户定义
(b) VB程序以顺序方式执行
(c) VB程序从Main()函数开始执行
(d) VB运行时，总是等待事件的发生
201    下列为整型变量的是（ ）。
C(a) x!
(b) x#
(c) x%
(d) x$
202  设有语句组：
Dim  S1 As String*5
S1 = "VB Test"
则S1的值为（ ）。
B(a) VB Test
(b) VB Te
(c) VBTes
(d) BTest
203    下列（ ）是合法的变量名。
A(a) x_y
(b) x-y
(c) 2x
(d) and
204    下列（ ）为单精度变量。
A(a) x!
(b) x#
(c) x%
(d) x$
206    定义变量时如不指定类型，该变量为（ ）变量。
C(a) Integer
(b) String
(c) Variant
(d) Single
207    用户自定义数据类型的成员不能是（ ）。
A(a) 数组
(b) 日期型
(c) 货币型
(d) 定长字符串
208    下列（ ）是合法的变量名。
B(a) x%y
(b) xy%
(c) 2x
(d) Or
209    日期常量用（ ）作为界定符。
C(a) "
(b) %
(c) #
(d) &
301  表达式4 + 6 \ 5 * 7 / 9 Mod 3的值是（ ）。
B(a) 4
(b) 5
(c) 6
(d) 7
302    下列逻辑表达式为True的是（ ）。
C(a) "A"<"9"
(b) "A">"a"
(c) "a">"AT"
(d) "AT"<"AND"
303    下列运算符中，优先级最高的是（ ）。
B(a) Like
(b) Mod
(c) Not
(d) Eqv
304  设a=6，b=5，c=-2；执行语句Print a > b > c后，窗体上显示的是（ ）。
B(a) 1
(b) True
(c) False
(d) 出错信息
305    下列表达式中，
值最大的是（ ）。
没有caption属性的控件是C(a) 2 \ 3
(b) 2 / 3
(c) 2 mod 3
(d) 3 mod 2
306    下列运算符中，优先级最低的是（ ）。
D(a) *
(b) ^
(c) /
(d) \
307  表达式 2 = 3 < 1 的是（ ）。
C(a) 0
(b) 1
(c) True
(d) False
308    x大于0且小于10的VB表达式是（ ）。
B(a) 0 < x < 10
(b) x > 0 And x < 10     
(c) x > 0 Or x < 10
(d) x > 0 : x < 10
309  判断整型变量x是奇数的表达式是（ ）。
A(a) x Mod 2 <> 0
(b) x Mod 2 != 0     
(c) x Mod 2 ≠ 0
(d) x Mod 2 ＝ 0
401    返回值为数值的函数是（ ）。
B(a) Mid
(b) Instr
(c) Left
(d) Rtrim
402  表达式Len("；幸运52")的值是（ ）。
B(a) 0
(b) 4
(c) 6
(d) 8
403    以下（ ）语句可表示[50,100]之间的随机数。
B(a) Int(Rnd * 51) + 49
(b) Int(Rnd * 51 +50) 
(c) Int(Rnd * 50) + 50
(d) Int(Rnd * 50 + 50) 
404    返回值为字符串的函数是（ ）。
A(a) Str
(b) Val
(c) Len
(d) Asc
405  当x=0时，函数IIf(x > 0, 1, IIf(x < 0, -1, 0))的返回值是（ ）。
A(a) 0
(b) 1
(c) -1
(d) 出错
406    表达式Fix(5.6) + Int(-5.6)的值是（ ）。
B(a) 0   
(b) -1  　
(c) 1   
(d) 以上都不对
407  如果Sgn(x)的值为-1，整型变量x的值是（ ）。
D(a) 0   
(b) 整数  　
(c) 正整数   
(d) 负整数
408    表达式InStr(2, "；文本文件", "；文")的值是（ ）。
C(a) 0   
(b) 1  　
(c) 3   
(d) 5
409    除去字符串左侧空格的函数是（ ）。
C(a) Left()
(b) Trim()  　
(c) Ltrim()  　
(d) LeftTrim()
501    VB表达式Format(Val("111a"), "##.##")的值是（ ）。
C(a) 11.1a
(b) 11.10
(c) 111.
(d) 111.00
504  正确使用Cls方法的是（ ）。
B(a) Text1.Cls
(b) Picture1.Cls 
(c) List1.Cls
(d) Image1.Cls
505    下列语句合法的是（ ）。
C(a) x + y = 2
(b) x > 2 = y
(c) x = y > 2
(d) x = y++
506  错误使用Print方法的是（ ）。
D(a) Picture1.Print
(b) Form1.Print 
(c) Debug.Print
(d) Text1.Print
507  Print方法分区输出时，用（ ）分隔多个表达式。
B(a) 空格
(b) 逗号   
(c) 冒号
(d) 分号
508  Print "10+6="; 10+6的输出结果是（ ）。
C(a) 16=10+6      　
(b) 10+6=10+6
(c) 10+6=16
(d) "10+6="10+6
509    下列叙述错误的是（ ）。
A(a) 不允许使用行号与标号
(b) 单条语句可分行书写
(c) 同一行上可以书写多条语句
(d) VB代码不区分字母的大小写
601    执行x = InputBox("；请输入半径",0,"；求面积") ，在输入框中输入3后回车，则下列叙述正确的是（ ）。
B(a) x的值是数值
3
(b) x的值是字符"3" 
(c) 0是默认值
(d) 对话框标题是"；求面积"
602    执行x = MsgBox("；数据类型不匹配",1,"；出错提示!") ，然后单击消息框的"；取消"；按钮，x的值是（ ）。
D(a) True
(b) False
(c) 1
(d) 2
603    下列语句正确的是（ ）。
B(a) MsgBox VbOkOnly, "Error"     
(b) MsgBox "Error", VbOkOnly
(c) MsgBox ( VbOkOnl
y, "Error" ) 
(d) MsgBox ( "Error", VbOkOnly )
604  执行Len(InputBox("；请输入编号:"))，在输入框中输入"；神州1号"；后回车，结果为（ ）。
A(a) 4
(b) 7
(c) 0
(d) 出错
605    执行MsgBox "；除数不能为0！", 48, "；数据出错"，在弹出的消息框中显示的图标是（ ）。
C(a) 停止图标
(b) 问号图标
(c) 感叹号图标
(d) 消息图标
606    下列语句组：
　a$="Today And Tomorrow"
　b$=Right(a$,8):c$=Left(a$,5)
　MsgBox a$, ,b$,c$
执行后消息框的标题是（ ）。
B(a) Today   
(b) Tomorrow
(c) Today And Tomorrow
(d) 1
607    下列语句组：
　a$="Today And Tomorrow"
　b$=Right(a$,8):c$=Left(a$,5)
　MsgBox a$, ,b$,c$
执行后消息框中显示的内容是（ ）。
C(a) Today   
(b) Tomorrow
(c) Today And Tomorrow
(d) 1
608    下列程序运行时，消息框显示的内容是（ ）。
　Private Sub Command1_Click()
MsgBox CStr(123 + 321)
End Sub
A(a) 444   
(b) 123321
(c) 123+321
(d) 显示出错信息
609    窗体上有一个命令按钮Command1，编写如下事件过程：
　Private Sub Command1_Click()
x = InputBox("x=")
y = InputBox("y=")
Print x + y
End Sub
运行后，单击命令按钮，先后在两个输入对话框中输入123和321，窗体显示的内容是（ ）。
B(a) 444   
(b) 123321
(c) 123+321
(d) 出错信息
701    将窗体的（ ）属性设置为True，可使Form_Load事件中的Print方法显示结果。
C(a) DrawStyle
(b) DrawMode
(c) AutoRedraw
(d) Enabled
702    将窗体的BoderStyle属性设置为（ ）可使窗口不显示标题栏。
A(a) 0
(b) 1
(c) 2
(d) 5
703    下列叙述正确的是（ ）。
B(a) 窗体的Name属性可以为空     
(b) 窗体的Name属性定义窗体的名称     
(c) 可以在运行期间改变窗体的Name属性     
(d) 窗体的Name属性的值显示在窗体标题栏中
704    设置窗体的（ ）属性可改变窗体标题。
A(a) Caption
(b) Name
(c) BackColor
(d) BorderStyle
705    通过（ ）属性设置窗体图标。
D(a) Icon
(b) Picture
(c) MouseIcon
(d) DownPicture
706    一个工程含有多个窗体及标准模块，下列叙述错误的是（ ）。
A(a) 如果工程含Sub Main过程，程序首先执行该过程
(b) 任何时刻最多只有一个窗体是活动窗体
(c) 标准模块不能设置为启动
模块
(d) Hide方法只是隐藏而不从内存中清除窗体
707    使用（ ）方法可隐藏窗体，但不从内存中释放。
C(a) Show   
(b) Load   
(c) Hide   
(d) UnLoad
708    下列描述错误的是（ ）。
C(a) 窗体的Load事件在加载窗体时发生
(b) 窗体的Height、Width属性用于设置窗体的高和宽
(c) 执行Unload Form1语句后，窗体仍在内存中但不可见
(d) 当窗体的Enabled属性为False时，对窗体的操作都被禁止
709    运行后，在窗口上单击鼠标时，窗体不会接收到的事件是（
）。
D(a) MouseDown   
(b) MouseUp   
(c) Click   
(d) Load
801    下列叙述错误的是（ ）。
A(a) 标签和文本框都有Caption属性
(b) 标签和文本框的主要区别在于能否编辑其内容
(c) 标签具有AutoSize属性，而文本框没有
(d) 文本框具有ScrollBar属性，而标签没有
802  能清除文本框Text1中内容的语句是（ ）。
B(a) Text = ""
(b) Text1.Text = ""
(c) Text1.clear
(d) Text1.Cls
803    设置（ ）属性使标签Label1没有边框。
A(a) Label1.BorderStyle = 0
(b) Label1.BorderStyle = 1
(c) Label1.BackStyle = True
(d) Label1.BackStyle = False
804    下列叙述错误的是（ ）。
B(a) 标签和文本框都有Move方法
(b) 标签和文本框都有Text属性
(c) 标签具有Caption属性，而文本框没有
(d) 文本框具有Locked属性，而标签没有
805    下列控件属性赋值语句错误的是（ ）。
D(a) Label1 = "；欢迎"
(b) Text1.Text = "；欢迎"
(c) Text1 = "；欢迎"
(d) Text = "；欢迎"
806    设置标签Label1的（ ）属性使它不可见。
D(a) Label1.Visible = 0
(b) Label1.Visible == 1
(c) Label1.Visible = True
(d) Label1.Visible = False
807    设置标签的（ ）属性，可改变其文字对齐方式。
C(a) Justify
(b) Font 
(c) Alignment   
(d) 以上都不是
808    触发文本框Change事件的操作是（ ）。
A(a) 改变文本框的内容
(b) 改变文本框的大小
(c) 文本框获得焦点
(d) 文本框失去焦点
809    修改文本框的内容触发（ ）事件。
B(a) Modify
(b) Change 
(c) ChangeData   
(d) AutoSize
902    下列语句组：
　ScaleWidth = 100 : ScaleHeight = 100
Circle(50, 40) ,10, , , ,2
绘制的是（ ）。
B(a) 圆形
(b) 椭圆
(c) 扇形
(d) 弧线
903  将当前目录下的图形文件Clock.jpg装入图片框Picture1的语句是（ ）。
D(a) Picture = "Clock1.jpg"     
(b) Picture = LoadPicture("Clock1.jpg") 
(c) Picture1.Picture = "Clock1.jpg"
(d) Picture1.picture = LoadPicture("Clock1.jpg")
904    设置Line控件的（ ）属性可使其呈现不同式样。
A(a) BorderStyle
(b) Style
(c) FillStyle
(d) Shape
907    设置图片框的（ ）使其按图片尺寸自动调整大小
。
A(a) AutoSize属性为True
(b) AutoSize属性为False
(c) Stretch属性为True
(d) Stretch属性为False
908    不属于VB作图方法的是（ ）。
C(a) Pset
(b) Line
(c) Shape
(d) Circle
909    VB的图形控件不包括（ ）。
B(a) 直线
(b) 框架
(c) 图像框
(d) 图片框
1001    复选框的Value属性为0表示（ ）。
A(a) 复选框未被选中
(b) 复选框被选中
(c) 复选框内有灰的钩
(d) 操作出错
1002  单选按钮被选定时，其Value属性为（ ）。
C(a) 1
(b) 0
(c) True
(d) False
1005    下列（ ）语句使复选框Check1的标题显示在左边。
D(a) Check1.Style = 0
(b) Check1.Alignment = 0
(c) Check1.Style = 1
(d) Check1.Alignment = 1
1007   
复选框和单选按钮的（ ）属性可以反应其当前状态。
A(a) Value
(b) Checked
(c) Caption
(d) Selected
1008    单选按钮不具有（ ）属性。
B(a) Value
(b) Checked
(c) Caption
(d) Stytle
1009    要取得复选框的状态，应访问（ ）属性。
A(a) Value
(b) Checked
(c) Visible
(d) Enabled
1101  在属性窗口为命令按钮的Picture属性装入了图片，但却没有显示的原因是（ ）。
B(a) 按钮的Enabled属性为False     
(b) 按钮的Sytle属性为0
(c) 按钮的Default属性为False   
(d) 按钮的DisabledPicture属性没有装入图片
1102    如果命令按钮的Caption属性包含（ ），则按下Alt+C可激活该按钮。
A(a) &C
(b) $C
(c) #C
(d) @C
1103  设置命令按钮的（ ）属性为True，可使按下Esc键时执行该按钮的单击事件过程。
A(a) Cancel
(b) Enabled
(c) Value
(d) Default
1104    设置命令按钮的（ ）属性，可使指针指向该按钮时显示提示内容。
B(a) Caption
(b) ToolTipText
(c) Font
(d) Tag
1105    下列（ ）方法不能触发命令按钮的Click 事件。
C(a) 在程序运行时单击命令按钮   
(b) 在代码中设命令按钮的Value属性为True   
(c) 在设计时设命令按钮的Default属性为True，运行时按ESC键   
(d) 使用Tab键把焦点移到按钮上，然后按空格键或回车键
1106    下列描述错误的是（ ）。
D(a) 单击命令按钮可触发MouseDown事件
(b) 单击命令按钮可触发MouseUp事件
(c) 命令按钮支持单击事件
(d) 命令按钮支持双击事件
1107  窗体上有命令按钮OK，它的单击事件过程为CmdOK_Click()，则该按钮的Name和Caption属性分别为（ ）。
C(a) OK,Cmd
(b) Cmd,OK
(c) CmdOK,OK
(d) OK，CmdOK
1108    执行（ ）语句，可使窗口的按钮Command1上显示“确定”。
B(a) Command1.Show = "；确定"
(b) Command1.Caption = "；确定"
(c) Command1.Name = "；确定"
(d) Command1.Visible = "；确定"
1109    命令按钮不能响应（ ）事件。
A(a) DblClick
(b) DragDrop
(c) KeyPress
(d) MouseMove
1202    下列（ ）控件结合了文本框和列
表框的特性。
C(a) 图片框
(b) 图像框
(c)  组合框
(d) 标签
1203    将列表框的MultiSelect属性设置为（ ）后，可用Shift或Ctrl键配合鼠标在列表框中进行多项选择。
D(a) 无   
(b) 0   
(c) 1
(d) 2
1205  使用（ ）语句将"；北京奥运"；添加到列表框List1的首相。
D(a) List1.Text = "；北京奥运"
(b) List1.AddItem "；北京奥运" 
(c) List1.List(0) = "；北京奥运"
(d) List1.AddItem "；北京奥运",0 
1206    使用（ ）方法可以只删除列表框指定项目。
D(a) Cls
(b) Clear
(c) Remove
(d) RemoveItem
1207    用（ ）方法可将项目添加到组合框中。
D(a) List
(b) ListIndex
(c) Add
(d) AddItem
1208    能输出组合框Combo1中现有项目数的语句是（ ）。
C(a) Print Combo1.ListIndex
(b) Print Combo1.Index 
(c) P
rint Combo1.ListCount
(d) Print Combo1.Count
1209  使用（ ）语句可将组合框Combo1的第3项置为当前项。
C(a) Combo1.ListIndex = 3
(b) Combo1.Index = 3
(c) Combo1.ListIndex = 2
(d) Combo1.Index = 2
1302  将框架的（ ）属性设为False，可使框架内的所有对象在运行时均不可操作。
A(a) Enabled
(b) Visible
(c) BorderSytle
(d) ClipControls
1304    下列叙述错误的是（ ）。
D(a) 计时器的Enabled属性为False，会暂停计时器的计时操作 
(b) 运行时计时器不可见，所以其位置和大小无关紧要   
(c) 触发计时器Timer事件的时间间隔可人为设定
(d) 计时器的Interval属性以秒为单位
1305    用（ ）分隔同一窗体中的多组单选按钮，使它们互不干扰。
A(a) 框架
(b) 组合框
(c) 复选框
(d) 列表框
1307    设置（ ）属性可改变单击滚动条两端箭头时的滚动步长。
D(a) Max 
(b) Min
(c) LargeChange 
(d) SmallChange
1308  将框架的（ ）属性设为False，可使框架内的所有对象在运行时均不可见。
B(a) Enabled
(b) Visible
(c) BorderSytle
(d) ClipControls
1309    计时器控件能正常工作应具备的两个条件是（ ）。
C(a) Enabled属性为True和Interval属性为0
(b) Enabled属性为False和Interval属性为0
(c) Enabled属性为True和Interval属性非0
(d) Enabled属性为False和Interval属性非0
1401    使用（ ）方法将焦点移到某个控件上。
A(a) SetFocus
(b) GotFocus
(c) Move
(d) Refresh
1403    下列叙述错误的是（ ）。
A(a) 所有的控件均支持Tab顺序       
(b) 可以在设计阶段改变Tab顺序
(c) 可以在运行阶段改变Tab顺序 
(d) 可以设置相应的属性使Tab顺序不起作用
1405  对文本框Text1编写如下事件过程：
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim b As String
b = Chr(KeyAscii)
KeyAscii = Asc(UCase(b))
End Sub
运行时，下列叙述正确的是（ ）。
C(a) Text1中无法输入字符
(b) Text1中内容为&

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