内容发布更新时间 : 2024/12/29 0:15:24星期一 下面是文章的全部内容请认真阅读。
13、设在界面上放置了一个滚动条Hscroll1和一个标签控件Label1，要使每次单击滚动条两端箭头时，或单击滚动条滑块与两端箭头之间的空白区域时，标签内容能够反映滚动条的值，补齐以下代码。
Private Sub Hscroll1.__________________( ) Label1.Caption = Hscroll1.___________________ End Sub
要使拖动滚动条滑块时标签内容能够反映滚动条的值，补齐以下代码。 Private Sub Hscroll1.________________( )
Label1.Caption = Hscroll1.__________________ End Sub
14、列表框（ListBox）用于列出可供选择的项目的列表，用户可以选择一个或多个项目。它具有几个非常重要的数组属性，其中__ __属性存放了列表框中所有项目的值。
15、菜单项一般由标题、访问键、快捷键和复选标志等构成，通过对相应的属性进行设置可以改变这些项目的状态，其中与复选标志相对应的属性是__ __。
16、keydown与keypress事件各有其参数，若需获得用户按下 \还是 \需用____________事件。
17、控件________组合了文本框和列表框的功能，是VB中一种功能非常强大的选择类控件。
18、若需要将窗体Form2以模态窗口的形式显示出来，可通过执行代码_________________来实现。
19、菜单中的分隔条是一种菜单控件，不响应__________事件，不能被选中。 二、选择题
1、当程序运行时，在窗体上单击鼠标，以下哪个事件是窗体不会接收到( ) A．MouseDown B．MouseUp C．Load D．Click
2、窗体Form1的Name属性是Frm1，它的单击事件过程名是（ ） A．Form1_Click B．Form_Click C．Frm1_Click D．Me_Click 3、用于设置通用对话框控件显示文件类型的属性是（ ） A．Filter B．Path C．Partern D．FoleName 4、用于从内存删除窗体的命令是（ ）
A．Move B．Hide C．Unload D．Delete 5、用于返回窗体可用区域宽度的属性是（ ）
A．ScaleWidth B．ScaleLeft C．ScaleHeight D．ScaleTop 6、下列关于属性设置的叙述错误的是：（ ）
A．一个控件具有什么属性是VB预先设计好的，用户不能改变 B．一个控件具有什么属性是VB预先设计好的，用户可以改变
C．一个控件的属性即可以在属性窗口中设置，也可以用程序代码设置
D．一个控件的属性在属性窗口中设置，还可以利用程序代码为其设置新值 7、下列说法正确的是（ ）
A．对象属性只能在“属性窗口”中设置 B．一个新的工程可以在“工程窗口”中建立 C．必须先建立一个工程，才能开始设计应用程序
第 １１ 页 共 31 页
D．只能在“代码窗口”中编写程序代码
8、下列关于窗体上控件的基本操作错误的是（ ） A．按下一次DEL键只能删除一个控件 B．按下一次DEL键可以同时删除多个控件
C．按住SHIFT键，然后单击每个要选择的控件，可以同时选中多个控件 D．按住ALT键，然后单击每个要选择的控件，可以同时选中多个控件 9、下列关于设置控件属性的叙述正确的是（ ） A．用户必须设置属性值
B．所有的属性值都可以由用户随意设定 C．属性值不必一一重新设置
D．不同控件的属性项都完全一样
10、不可以通过下列（ ）操作将焦点赋给对象 A．运行时使用TAB键 B．在代码中用CALL语句调用 C．在代码中用SETFOCUS方法 D．用访问键或用鼠标单击选择对象
11、要在FORM_LOAD事件过程中使用PRINT方法在窗体上输出一定的内容，应（ ） A．设置窗体的VISIBLE属性 B．设置窗体的CAPTION C．调用窗体的SHOW方法 D．设置窗体ENABLED属性 12、下面（ ）对象无CAPTION属性 A．FORM B．COMMANDBUTTON C．TEXTBOX D．LABEL
13、通用对话框控件和文件列表框控件中，都能根据文件的类型对要显示的文件进行筛选过滤，后者使用（ ）属性进行该项设置。 A．Pattern B．Path C．Filter D．FileName
14、对于复选框控件chkBoy，如果在程序中设置它为选中状态，下面语句正确的是（ ） A．chkBoy.Checked = true B．chkBoy.Value = true C．chkBoy.Selected = true D．chkBoy.Value = 1
15、计时器（Timer）控件用于每隔一段时间自动触发一次Timer事件，可以有规律地重复执行一段程序，它用于设置两次事件时间间隔的属性是（ ） A．Interval B．SmallChange C．LargeChange D．Max
16、以下关于VB中窗体（Form）的说法中，不正确的描述为（ ） A．执行Unload Form语句后，窗体Form消失，但仍在内存中
B．当窗体的Enabled属性为False时，通过鼠标和键盘对窗体的操作都被禁止 C．窗体的Height、width属性用于设置窗体的高和宽 D．窗体的load事件在加载窗体时发生
17、关于滚动条控件，下面说法错误的是（ ）
A．点击滚动条的箭头，可以改变它的value值，从而引发Change事件 B．拖动滚动框，可以触发Scroll事件
C．通常，水平滚动条的值从左向右递增，垂直滚动条的值自上而下递增 D．拖动滚动框，可以触发Change事件，而且是连续触发的
18、在窗体上放置一个命令按钮，名称为Command1。单击命令按钮时，执行如下事件过程：
第 １２ 页 共 31 页
PriVate Sub Command1_C1ick() a$=\b$＝Right(a$,8) c$=Mid(a$,1,8) Msgbox a$,b$,c$,1 End Sub
则在弹出的信息框的标题栏中显示的信息是（ ） A．softWare and hardware B．software C．hardwafe D．出现错误
19、在多重窗体程序设计中，关键的问题是要解决不同窗体之间的衔接和窗体的显示、关闭等问题，以下关于窗体的相关语句和方法的叙述中，错误的是（ ） A．Load语句用于加载指定窗体，即在内存中创建该窗体 B．Show方法兼具Load语句的功能，可以将窗体显示出来 C．Hide方法用于将窗体隐藏起来
D．Unload语句用来释放窗体，但窗体并没从内存中消
20、滚动条控件的属性中，表示取值范围最大值的属性是（ ） A．Max B．LargeChange C．Min D．Value
21、程序中如果需要检测和控制鼠标的位置和状态的改变，就需要使用鼠标事件，其中下面哪个选项用于表示拖动事件（ ） A．DragDrop B．MouseDown C．MouseUp D．MouseMove 22、为了使用通用对话框进行打开文件的操作，应将通用对话框的Action属性设定为（ ）。 A．0 B．1 C．2 D．3 三、简答题
1、什么是单选按钮？什么是复选框？在使用上有什么不同？ 2、滚动条的change事件和scroll事件有什么不同？ 3、快捷键和访问键有什么区别？ 4、在程序运行期间，如果拖动滚动条上的滚动块（即滑块），则触发滚动条的什么事件？ 5、假定有一个菜单项，名为MenuItem，为了在运行时使该菜单项失效（变灰），应使用什么语句？
6、为了暂时关闭计时器（即时钟控件），应把该计时器的什么属性设置为False？ 7、单选按钮和复选框（即检查框）各用于什么情况？ 8、如何为一个菜单项设置热键和快捷键？ 9、菜单的形式有哪两种？
10、在KeyPress事件中，如何取消用户刚输入的字符？ 11、框架的作用是什么？
12、如果要计时器每秒钟发生4个Timer事件，则Interval属性值应设多少？ 13、在一个窗体的程序代码中能否访问另一个窗体上控件的属性？若不行则请说明理由；若行则请说明如何访问。
14、如何在框架中建立控件？
第 １３ 页 共 31 页
15、组合框有哪几种类型？ 五、编程题
1、在窗体上有一个文本框控件，名称为TxtTime；一个计时器控件，名称为Timer1，要求每一秒在文本框中显示一次当前的时间，请编程实现。
2、在Text1中输入任一英文字母，在Text2中显示该英文字母及其ASCII码值。要求在文本框Text2中显示出所有输入的英文字母及其ASCII码值，如下图所示。
Text1
Command1 Text2
3、编写一个程序，能够实现任意个整数的排序。
4、编程实现以下功能：用户首先分别在两个文本框中输入两个数，然后在具有“加、减、乘、除”等四个菜单项的“计算”菜单中单击某一项，即可在标签中显示出相应的结果或者错误提示。
5、编程实现任意两个数的“加、减、乘、除”。
6、编写一个程序，能够求任意个正整数的最大值和最小值。 7、编程求任意两个正整数的最大公约数。 六、程序分析填空题
1、建立一个如图所示的简单编辑器。用户在文本框（text1）中输入正文后，选中某些文本时可进行“剪切”、“复制”和“粘贴”操作。假设在窗体声明部分定义了一个变量str1，用于保存复制和剪切的内容，请把剪切按钮(btnCut)的Click事件补充完整。 程序运行界面：
第 １４ 页 共 31 页
Private Sub btnCut_Click() ?请补充
End Sub
2、计算1 + 2 + 3 + …… + 100的和并输出。请把下面用Do While ……Loop循环结构实现这一功能的代码补充完整。 Private Sub Form_Load() Dim sum,count as Integer ?请补充
Do while count <=100 ?请补充
Loop
Text1.Text = sum End Sub
3、列表框控件（ListBox）支持多项选择，这项功能在对用户的兴趣爱好进行调查的时候显得非常好用，在下图所示的界面中列表框List1用于列出爱好选项，供用户进行多项选择。
请把下列代码补充完整，能够取得用户的所选爱好选项： Private Sub Command1_Click() Dim i As Integer Dim s As String
s = txtname.Text & \爱好\ For i = 0 To List1.ListCount - 1 ?请补充
Next
Label3.Caption = s End Sub
4、要求利用计时器Timer1，在窗体Form1上每隔1秒钟打印一个1到10的随机整数，请把下列代码补充完整：
第 １５ 页 共 31 页