C、 Add
50、 触发文本框Change事件的操作是（）。
A、 改变文本框的内容 B、 改变文本框的大小
D、 Additem C、 文本框获得焦点 D、 文本框失去焦点
51、 运行时，下列哪种方法不能选中单选按钮（）。
A、 用鼠标单击单选按钮
B、 在属性窗口将单选按钮的value属性设置为1
C、 用tab键将焦点转移到一组单选按钮后单击其中的单选按钮 D、 采用单选按钮的访问见快捷方式
52、 窗体上有命令按钮ok，它的单击事件过程为cmdok_click（），则该按钮的name和caption属性分别为（）。 A、 Ok，Cmd C、 CmdOk，Ok B、 Cmd，Ok D、 Ok，CmdOk 53、 设置控件的（）属性为False，使该控件不能通过Tab键得到焦点。 A、 Default C、 TabStop B、 SetFocus D、 TabIndex 54、 单选按钮不具有（）属性。 A、 Value B、 Checked
C、 Caption D、 Stytle
55、 计时器控件能正常工作应具备的两个条件是（）。
A、 Enabled属性为True和Interval属性为0 B、 Enabled属性为False和Interval属性为0 C、 Enabled属性为True和Interval属性为非0 D、 Enabled属性为False和Interval属性为非0
56、 下列叙述中错误的是（）。 A、 如果文本框的TabStop属性为False，则不能接收从键盘上输入的数据 B、 文本框的Enabled属性为False时，其Tab顺序不起作用 C、 文本框失去焦点时，触发LostFocus事件 D、 可以用TabIndex属性改变Tab顺序 57、 复选框和单选按钮的（）属性可以反映其当前状态。 A、 Caption C、 Value B、 Aligment D、 Style
58、 使用（）语句将“北京奥运”添加到列表框list1的首项。 A、 List1.Text = \北京奥运\C、 List1.List(0) = \北京奥运\B、 List1.AddItem = \北京奥运\D、 List1.AddItem \北京奥运\59、 下列叙述中错误的是（）。 A、 在KeyUp事件中，在主键盘上输入”1”和在小键盘上输入“1”被视为操作相同的键 B、 只有获得焦点的对象才能够接受键盘事件
C、 KeyPress事件中可以识别键盘上某个键的ASCII码
D、 在KeyDown事件中，键盘上输入的A或a被视为按下相同的键 60、 在窗体上画一个名称为Text1的文本框，然后编写如下事件过程： Private Sub Text1_KeyPress（Keyascii As Integer） …
End Sub
若焦点位于文本框中，则能够触发Keypress事件的操作是（）。
A、 单击鼠标 C、 鼠标划过文本框 B、 双击文本框 D、 按下键盘上的某个键
61、 编写如下事件过程：
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Shift = 3 And Button = 2 Then Print \ End If End Sub
运行时，为了在窗体上输出\，应执行的操作为（）。
A、 按下Shift键和鼠标左键 C、 同时按下Shift、Alt键和鼠标左键 B、 按下Altt键和鼠标右键 D、 同时按下Shift、Ctrl键和鼠标右键 62、 编写如下两个事件过程：
Private Sub Form_KeyPress(KeyAscii As Integer) Print Chr(KeyAscii) End Sub
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Print Chr(KeyCode) End Sub
运行时，在不按住shift键和没有锁定大写情况下，按“A”键，程序的输出是（）。
A、 A C、 A
a A B、 a D、 a
A a 63、 对窗体上的文本框text1编写如下事件过程：
Private Sub Text1_KeyPress(KeyAscii As Integer)
If Chr(KeyAscii) > \ KeyAscii = 0 End If End Sub
运行时，文本框中能输入的字符是（）。
A、 字母 C、 大写字母外的其他字符 B、 大写字母 D、 不能输入字母 64、 对窗体上Text1编写如下事件：
Private Sub Text1_KeyPress(KeyAscii As Integer) If Chr(KeyAscii) > \KeyAscii = 0 End If End Sub
运行时，文本框中能输入的字符是（）。
A、 小写字母 B、 大写字母
65、 由系统触发的事件有（ ）。
A、 MouseMove,MouseUp,MouseDown B、 Hscrollbox,Click,DblClick
C、 大写字母以外的其他字符 D、 不能输入字母
C、 Initialze,Load,Timer D、 KeyPress,KeyUp,KeyDown
66、 在窗体上画一文本框Text1，要求文本框只能接收大写字母的输入，以下能实现该操
作的事件过程是（ ）。 A、 Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii〈65 Or KeyAscii > 90 Then MsgBox \请输入大写字母\ KeyAscii = 0 End If End Sub
B、 Private Sub Text1_Change( )
If Asc(Text1.Text) > 64 And Asc(Text1.Text) < 91 Then
MsgBox \请输入大写字母\KeyCode = 0 End If End Sub
C、 Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As
Single)
If Asc(Text1.Text) < 65 Or Asc(Text1.Text) > 90 Then
MsgBox \请输入大写字母\End If End Sub
D、 Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode〈65 Or KeyCode > 90 Then
MsgBox \请输入大写字母\KeyCode = 0 End If End Sub 67、 使用（ ）语句可将列表框List1的第3项的值置为“VB6.0”。
A、 List1.ListIndex(3) = \C、 List1.List(3) = \B、 List1.ListIndex(2) = \ D、 List1.List(2) = \68、 拖动滚动条中的滑块将触发滚动条的（ ）事件。 A、 DragOver C、 ItemCheck B、 Change D、 Scroll
69、 在窗体上有一个名称为Text1的文本框，要得到在其中输入字符的ASCII码，应使用它的（ ）事件。 A、 KeyPress C、 KeyDown B、 KeyUp D、 Change 70、 下列（ ）语句表示选中单选按钮Option1（ ）。 A、 Option1.Value=0 C、 Option1.Value=True B、 Option1.Value=1 D、 Option1.Value=False
71、 以下语句（ ）可将组合框Combo1的第1项置为当前项。
A、 Combo1.ListIndex = 1 C、 Combo1.ListIndex = 0 B、 Combo1.ListCount = 1 D、 Combo1. ListCoun = 0 72、 文本框获得焦点时，能触发KeyPress事件的操作是（ ）。 A、 选定文本框中内容 C、 按下键盘上的某个键 B、 双击文本框 D、 单击文本框
73、 在实际应用中，经常将一组单选按钮置于一个框架（Frame）控件内，这主要是为了（ ）。 A、 使该组单选按钮受到框架的控制 B、 使该组单选按钮构成一个控件数组
C、 使该组单选按钮免受框架外单选按钮的影响 D、 使该组单选按钮互斥，即同一时刻只有一个单选按钮被选中 74、 如果要把单选按钮的标题显示在它的左边，应把（ ）。 A、 Alignment属性设置为0 C、 Style属性设置为0 B、 Alignment属性设置为1 D、 Style属性设置为1
75、 在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Command1，然后编写如下事件过程：
Private Sub Command1_Click()
List1.List(List1.ListCount) = \End Sub 程序运行后，单击命令按钮，其结果为（）。
A、 把字符串\添加到列表框中，但位置不能确定 B、 把字符串\添加到列表框的最后 C、 把列表框的最后一项改为\D、 把字符串\插入到列表框的最前面 76、 假设列表框控件List1被设置为允许多重选择，那么可以返回所选列表项数目的属性是（）。 A、 SelCount C、 DataCount B、 ListCount D、 Count 77、 可以触发滚动条的Scroll事件的操作是（）。 A、 单击滚动条空白处 C、 拖动滚动条的滑块 B、 单击滚动条两端的箭头 D、 单击滚动条的滑块
78、 如果列表框List1中只有一个项目被选中，则语句Debug.Print List1.Selected(List1.ListIndex)执行的结果是（）。 A、 在立即窗口中输出被选定的项目的索引值 B、 在立即窗口中输出被选定的项目的文本内容 C、 在立即窗口中输出True D、 在立即窗口中输出False 79、 下列叙述错误的是（）。 A、 计时器的Interval属性值以秒为单位
B、 将计时器的Enabled属性设置为False，会停止计时器的操作 C、 计时器以一定的时间间隔触发Timer事件 D、 程序运行时计时器不可见，所以其位置无关紧要 80、 滚动条的（）属性表示其滑块所处的位置。 A、 Max C、 Value B、 Min D、 SmalChange 81、 复选框不具有（）属性。 A、 Value B、 Checked
C、 Caption D、 Stytle
82、 下列叙述中错误的是（）。
A、 重要的键盘事件有KeyPress、KeyUp和KeyDown
B、 默认情况下，鼠标单击窗体上的控件时，窗体的KeyPress、KeyUp和KeyDown是不
会发生的
C、 KeyUp和KeyDown所接收到的信息与KeyPress接收到的完全相同 D、 KeyPress接收到的是用户通过键盘输入的ASCII码字符 83、 为了使计时器控件Timer1每隔0.5秒触发一次Timer事件，则Timer1的Interval属性应设置为（）。 A、 500 C、 1000 B、 200 D、 5000 84、 以下关于KeyPress事件过程中参数KeyAscii的叙述中正确的是（）。 A、 KeyAscii参数是可以产生按键的ASCII码 B、 KeyAscii参数的数据类型为字符串 C、 KeyAscii参数可以省略 D、 KeyAscii参数是所按键上标注的字符 85、 下列（）控件不是容器。 A、 Form
B、 PictureBox
C、 Frame D、 Image
86、 组合框中的Style属性值确定了组合框的类型和显示方式，以下选项不属于Style属性
值的是（）。 A、 下拉式组合框 C、 简单式组合框 B、 弹出式组合框 D、 下拉式列表框 87、 当用户单击滚动条的空白处时，滑块移动的增量值由（）属性决定。 A、 Smallchange C、 Min B、 Largechange D、 Max 88、 对文本框Text1编写如下的事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim x As String x = Chr(KeyAscii)
KeyAscii = Asc(UCase(x)) Print String(4, KeyAscii) End Sub