VB典型例题解析（1）选择
二、选择题
1．以下控件中不是标准控件的是（）。
A．水平滚动条和垂直滚动条
B．ActiveX控件
C．文件列表框、目录列表框和驱动器列表框
D．OLE容器
分析：标准控件是由系统提供，不能添加与删除，也被称作内部控件。标准控件包括一些程序设计中最常用的对象，如：图片框，标签，文本框，框架，命令按钮，复选框，单选按钮，组合框，列表框，水平滚动条，垂直滚动条，计时器，驱动器列表框，目录列表框，文件列表框，图形，直线，图像框，数据，OLE容器等。
结论：答案应选B。
2．在Visual Basic中，要使一个窗体不可见，但不从内存中释放，应使用的语句是（）。
A．Show B．Hide C．Load D．UnLoand
分析：Show方法将窗体加载内存并显现，Hide方法将窗体加载到内存并隐藏，Load方法是加载窗体到内存，UnLoad是从内存中卸载窗体。结论：答案应选B。
3．Visual Basic在程序开发过程中用于使用窗体或控件对象的属性是（）。
A．Name B．Caption C．Text D．Enabled
分析：Name属性表示窗体对象的名字，Caption属性用于在窗体标题栏中显示标题信息，Text属性用于设置在文本框中显示的信息内容，Enabled属性用于设置是否激活对象。
结论：答案应选A。
4．以下事件中，不是鼠标事件的是（）。
A．DragDrop B．MouseDown
C．DbClick D．Change
分析：DragDrop事件是鼠标拖动对象时触发的事件；MouseDown事件是鼠标在此对象上按下时触发；DbClick事件是鼠标双击窗体时触发的事件；Change事件是对象的内容被改变时触发的事件。
结论：答案应选D。
5．对窗体编写如下事件过程：
Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,_Y As Single)
If Button=2Then
Print"AAAAA"
End If
End Sub
Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,_
Y As Single)
Print“BBBBB”
End Sub
程序运行后，如果单击鼠标右键后再单击鼠标左键，则输出结果为（）。
A．AAAAA B．BBBBB
BBBBB AAAAA
BBBBB BBBBB
C．AAAAA D．BBBBB
BBBBB BBBBB
分析：本题中MouseDown事件为鼠标在对象上按下时触发的事件，MouseUp事件是鼠标在对象上弹起时触发的事件。MouseDown和MouseUp 事件能够区分出鼠标的左、右和中按钮。Button参数是具有相应于左按钮（位1），右按钮（位2）的一个位字段。对于本题Button参数为2，单击右键IF条件满足，窗体中先显示“AAAAA”，再显示“BBBBB”。单击左键IF条件不满足，窗体继续显示“BBBBB”。
结论：答案应选A。
6．下面哪个属性不是标签控件的属性（）。
A．Alignment B．BorderStyle
C．Caption D．Text
分析：Alignment属性表示标签中文本的对齐方式，BorderStyle属性表示标签有无边框，Caption属性用来设置显示的文本信息内容，Text属性不是标签控件的属性。
结论：答案应选D。
7．下面哪个方法是控件获得焦点的方法（）。
A．GotFocus B．LostFocus
C．SetFocus D．Click
分析：GotFocus是一种当文本框获得焦点时触发的事件，LostFocus是一种当焦点从文本框离开时触发的事件，Click是鼠标单击产生的鼠标事件，只有SetFocus是方法，使用该方法可以获得焦点。
结论：答案应选C。
8．在Visual Basic中，下属（）控件可以包含其他控件。
A．Image B．TextBox
C．Frame D．CheckBox
分析：Frame控件即框架控件，是一种容器控件，它主要用于将其他控件进行分组。每个框架和它内部的控件可以作为一个整体进行移动、删除等操作。TextBox控件即文本框控件，主要用于用户在程序中向系统输入文本信息。Image控件即图像框控件，是用于显示图形信息的控件。CheckBox控件即复选框控件，用来显示应用程序的当前状态或者切换状态，复选框前面的方形区域内出现“√”表示被选中或者是当前的状态。TextBox控件、Image控件和CheckBox控件都不是容器控件。Grid不是控件。
结论：答案应选C。
9．假定窗体上有一个Text文本框，为使它的文本内容右对齐并且没有边框，则正确的属性设备为（）。
A．Text1.Alignment=1B．Text1.Alignment=2
Text1.BorderStyle=0Text1.BorderStyle=1
C．Text1.Alignment=1D．Text1.Alignment=2
Text1.BorderStyle=1Text1.BorderStyle=0
分析：Alignment属性设置或返回一个值，决定控件中文本的值的0为左对齐、1为右对齐、2为居中；BorderStyle属性设置或返回对象的边框样式，0为无边框、1为有边框。
结论：答案应选A。
textbox控件边框设置10．下列哪些方法是将项目添加到ComboBox控件中（）。
A．List B．ListIndex C．AddItem D．Move
分析：ComboBox控件即组合框控件，是一种组合了文本框功能和列表框功能的控件。在组合框中，用户既可以象使用文本框一样直接输入文本，也可以象使用列表框一样从列表中选择输入文本。组合框控件的List属性的值是一个数组，用于返回或设置控件的列表部分的项目；ListIndex属性返回或设置控件中当前选择项目的索引值，在设计时不可用；AddItem方法用于在ComboBox控件列表框中插入一个新的列表项；ComboBox中没有Move方法。
结论：答案应是C。
11．每当窗体失去焦点时会触发的事件是（）。
A．Active B．Deactive
C．LostFocus D．Initialize
分析：当一个对象成为活动窗口时触发Activate事件。当一个对象不再是活动窗口时触发Deactivate事件。LostFocus事件是在一个对象失去焦点时被触发。Initialize事件当应用程序创建Form、MDIForm、User控件、Property Page Webclass、DHIML PageDesigner或类的实例时发生。
结论：答案应选C。
12．在窗体（Name属性为Form1）上画两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（Name属性为Command1），然后编写如下两个事件过程：
Private Sub Command1_Click()
m=val(Text1.Text)&Text2.Text
Print m
End Sub
Private Sub Form_Load()
Text1.Text=""
Text2.Text=""
End Sub
程序运行后，在第一个文本框（Text1）和第二个文本框（Text2）中分别输入123和456，然后单击命令按钮，则输出结果为（）。A．579B．123456
C．123456D．456123
分析：在这段程序中创建了“Form_Load”窗体装载事件程序和“Command1_Click”命令按钮单击事件程序。窗体中设置了多个控件对象。文本框对象的“Text”属性中返回的数据为文本类型，虽然输入123和456，系统会默认为“123”和“456”两个字符串。“+”针对字符串运算时表示连接操作。因此“Text1.Text+Text2.Text”的结果为将“123”和“456”两个字符串进行连接操作，值为“123456”。
结论：答案应选C。
13．假定窗体上有一个标签，名为Label1，为了使该标签透明并且没有边框，正确的属性设置为（）。
A．Label1.BackStyle=0B．Label1.BackStyle=1
Label1.BorderStyle=0Label1.BorderStyle=1
C．Label1.BackStyle=True D．Label1.BackStyle=False
Label1.BorderStyle=True Label1,BorderkStyle=False
分析：标签的BackStyle属性设置标签背景是否为透明：0表示透明，1表示不透明。BorderStyle属性设置标签边框风格：0表示没有边框，1表示有边框。两个属性都没有True和False值
结论：答案应选A。
14．在窗体上画一个组合框（Combo1）和一个命令按钮（Command1），Combo1然后编写如下两个事件过程：
Private Sub Command1_Click()
m=InputBox("请输入0～2之间整数！")
a=Combo1.List(m)
Print a
End Sub
Private Sub Form_Load()
Combo1.AddItem"12"
Combo1.AddItem"34"
Combo1.AddItem"56"
End Sub
单击命令按钮后，在打开的对话框中输入“2”，输出结果为（）。
A．12B．34C．56D．0
分析：在本例中，在窗体上添加有一个组合框（Combo1）和一个命令按钮（Command1），制作按钮单击事件过程（Command1_Click）和窗体装载（Form_Load）事件过程。程序中组合框（Combo1）的AddItem方法用于向组合框（Combo1）中插入一个新的列表项，语句格式为：组合框.AddItem项目字符串[，索引值]
其中项目字符串就是要添加的项目的内容，索引值就是要添加的项目在列表中的位置，索引值从0开始计数。如果省略了索引值，新项目就会自动添加到列表的尾部。在窗体装载事件过程中设置组合框（Combo1）的AddItem方法为组合框赋值。在按钮单击事件过程中，利用InputBox消息对话框接收输入的数据“2”，利用“a=Combo1.List(m)”命令将组合框第3项数据赋值给变量a。利用“Print a”命令打印值为“56”。
结论：答案应选C。
15．为了暂时关闭计时器，应把该计时器的某个属性设置为False，这个属性是（）。
A．Enabled B．Timer
C．Visible D．Interval
分析：计时器控件是一个不在应用程序运行阶段显示的控件。Enable属性可设定控件有效，返回或设
置一个值，属性值为True时计时器
才有效。计时器无Visible属性。Interval属性可设定计时的时间长度，它的属性值是一个数值，单位是毫秒。计时器开始计时后，每经过一段按照Interval属性设定时间间隔，会自动触发一次Timer事件并且重新计时。
结论：答案应选A。
16．下列不能打开【菜单编辑器】的操作是（）。
A．按Ctrl+E
B．单击工具栏中的【菜单编辑器】按钮
C．执行【工具】菜单中的【菜单编辑器】命令
D．按Shift+Alt+M
分析：本题中，前3项都可以打开菜单编辑器，Shift+Alt+M是无效操作。
结论：答案应选D。
17．假定有一个菜单项MenuItem，为了在运行时该菜单无效（变灰），应使用的语句为（）。
A．MenuItem.Enabled=False B．MenuItem.Enabled=True
C．MenuItem.Visible=True D．MenuItem.Visible=False
分析：本题中，Enabled属性返回或设置一个值，该值用来确定一个窗体或控制件是否能够对用户产生的事件做出反应，若值为True则有效，否则为无效；Visible属性返回或设置指示对象为可见或隐藏的值，返回值若为True则可见，否则不可见。
结论：答案应选A。
18．将调试通过的工程经【文件】菜单的【生成.exe文件】编译成.exe后，将该可执行文件转到其他机器上不能运行的主要原因是（）。A．缺少.frm窗体文件
B．运行的机器上无Visual Basic系统所需的动态连接库
C．该可执行文件有病毒
D．以上原因都不对
分析：Visual Basic程序编译成.exe可执行文件后，如果在其他无Visual Basic系统的计算机上使用需要安装一些动态连接库。因此，如果想在其他计算机上都能正常运行Visual Basic程序，需要将工程打包，制成安装盘。
结论：答案应选B。
20．在窗体中添加一个命令按钮，并编写如下程序：
Private Sub Command1_Click()
a=1:b=2:c=3
a=b:b=c:c=a
Print c
End Sub
程序执行后，输出的结果是（）。
A．0B．1C．2D．3
分析：初始值为a=1，b=2，c=3；执行a=b后a=2，b=2，c=3；执行b=c后a=2，b=3，c=3；执行c=a后a= 2，b=3，c=2。
结论：答案应选C。
21．在Visual Basic中，默认缺省的数据类型为（）。
A．Double B．Boolen
C．Integer D．Variant
分析：Integer整数型为用16位二进制码表示一个整数；Double双精度浮点数型为使用64位二进制码表示一个浮点数；Boolean布尔型数据的值是一个逻辑值，只有真和假两种取值，用两个字节存贮；Variant变体型数据可以是数值、日期、字符串、货币等各种类型，而且可以转变为其他的数据类型；是Visual Basic中的缺省数据类型。
结论：答案应选D。
22．Double类型的数据有（）字节组成。
A．2B．4
C．8D．16
分析：数据类型中，双精度浮点数型（Double）使用64位二进制码表示一个浮点数，即8个字节。
结论：答案应选C。
23．DateTime是一个Date类型的变量，以下赋值语句中正确的是（）。
A．DateTime="5/14/01"
B．DateTime=September1,2001
C．DateTime=#12：15：00AM#
D．DateTime=(8/8/99”)
分析：在VB中日期时间型的常量用“#”号分隔。
结论：答案应选C。
24．在窗体中添加一个命令按钮，并编写如下程序：
Public Enum WeekDays
Sunday=0
Monday
Tuesday
Wednesday
Thursday
Friday
Saturday
Invalid=-1
End Enum
Private Sub Command1_Click()
Dim myday As WeekDays
myday=Saturday
Print Val(myday)
End Sub
程序运行后，单击命令按钮产生的结果为（）。
A．Saturday B．6C．false D．-1
分析：枚举类型提供了使常数名称与数值相关联的方法。本例将与星期（Monday到Saturday）日期关联的一组整数常数声明为一个枚举类型（WeekDays），然后在代码中使用星期的名称，输出为该枚举项的整数数值。
结论：答案应选B。
25．有如下一组程序语句：
Private Sub Command1_Click()
Dim sum As Integer
sum%=10
sum=3.2
Print sum%;sum
End Sub
运行时的输出结果是（）。
A．103B．1010
C．3.2  3.2D．33
分析：在本例中，程序的第一行就用Dim语句将变量sum定义为整型；变量可以通过在变量名尾部加上一个类型说明符号的方法表示变量的数据类型，在第二行中sum后面是有“%”符号，表示sum是整型，因此sum%和sum是同一个变量，变量sum被赋值为10；在第三行中sum又被赋值为3.2，VB系统自动将其转换为整型数3；在第四行中使用Print语句中输出两次sum。
结论：答案应选D。
26．定义符号常量所使用的命令为（）。
A．Dim B．Public
C．Static D．Const
分析：符号常量是指用户根据程序设计需要，使用自定义的符号来代替一个数值常量。在Visual Basic中使用Const定义符号常量。Dim 用于在标准模块和窗体模块或者过程中定义变量；Static用于在过程中定义静态变量和数组变量；Public：主要用于在标准模块中定义全局变量和数组。
结论：答案应选D。
27．有如下程序：
Private Sub Command1_Click()
x=Sqr(2)+Sgn(2)+Rnd(2)*10
y=Sqr(3)+Sgn(3)+Rnd(3)*10
If x>y Then
Print"x>y"
ElseIf x=y Then
Print"x=y"
Else
Print"x<y"
End If
End Sub
程序运行后，窗体显示的结果为（）。
A．x>y B．x=y
C．x<y D．不确定
分析：本例是测试对If…Then…Else…end If分支结构和内处标准函数语句的理解。程序第二行为“x”赋值的表达式，用到数学函数Sqr()和Sgn()，以及随机函数Rnd(3)。Sqr()函数返回自变量x的平方根；Sgn(x)返回自变量x的符号；Rnd(x)函数可以产生一个0到1之间的单精度类型的随机数。程序第二行为“y”赋值的表达式。在判断x和y的大小时用到If…Then…Else…end If分支结构，本例中表示如果x>y条件成立，显示“x>y”，又如果x=y条件成立，显示“x=y”，否则显示“x<y”。因为x和y中都含有随机函数，所以每次随机函数产生的数值大小不定，不同的随机数导致x和y比较结果不定。
结论：答案应选D。
28．在程序中添加一个命令按钮，并编写如下程序代码：
Private Sub Command1_Click()
x="12.34":y="56.78"
z=x+y
p=Val(z)
Print p
End Sub
程序运行后，单击命令按钮后的输出结果为（）。
A．12.34B．56.78C．69.12D．12.3456
分析：本例中，在程序的第二行定义了两个字符串x和y；第三行中z的值为两个字符串连接运算的结果值“12.3456.78”；第四行用Val()函数将z中数字字符串转换成数值存于p，转换时，认为第2个小数点为非数字，转换结束。
结论：答案应选D。
29．在Visual Basic中表达式x=8的类型是（）。
A．错误的表达式B．关系表达式
C．算术表达式D．逻辑表达式
分析：在Visual Basic中，“=”运算符有两种含义，一是用作“赋值号”，“x=8”作为赋值语句；二是将“=”看做是“关系运算符”，“x=8”作为表达式。本例中明确指明“x=8”是一个表达式，因此“=”在此是“关系运算符”，“x=8”即为关系表达式。
结论：答案应选B。
30．在下列四个表达式中，非法的Visual Basic表达式是（）。
A．x=x+y B．x+y>z C．x=(x=y)D．以上均为合法表达式

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