《VB程序设计》综合复习资料习题

发布时间 : 星期一 文章《VB程序设计》综合复习资料习题更新完毕开始阅读

二、选择题

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.必须先建立一个工程,才能开始设计应用程序 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。单击命令按钮时,执行如下事件过程:

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、如何在框架中建立控件? 15、组合框有哪几种类型? 四、读程序题

1、对窗体编写如下代码: Option Base 1

Private Sub Form_KeyPress(KeyAscii As Integer) a = Array(237,126,87,48,498) m1 = a(1) m2 = 1

If KeyAscii = 13 Then For i =2 To 5 If a(i)>ml Then m1 =a(j) m2 =i End If Next i End If Print m1 Print m2 End Sub

程序运行后,按回车键,输出结果是什么? 2、阅读下面的程序,写出执行结果。 Private Sub Form_load() Form1.show d = 0

For a = 1 To 2 For b = 1 To a For c = b To 5 d = d + 1 Next c Next b

Next a Print d

End Sub 五、编程题

1、在窗体上有一个文本框控件,名称为TxtTime;一个计时器控件,名称为Timer1,要求每一秒在文本框中显示一次当前的时间,请编程实现。

2、在Text1中输入任一英文字母,在Text2中显示该英文字母及其ASCII码值。要求在文本框Text2中显示出所有输入的英文字母及其ASCII码值,如下图所示。

3、编写一个程序,能够实现任意个整数的排序。

4、编程实现以下功能:用户首先分别在两个文本框中输入两个数,然后在具有\加、减、乘、除\等四个菜单项的\计算\菜单中单击某一项,即可在标签中显示出相应的结果或者错误提示。

5、编程实现任意两个数的\加、减、乘、除\。

6、编写一个程序,能够求任意个正整数的最大值和最小值。 7、编程求任意两个正整数的最大公约数。 六、程序分析填空题

1、建立一个如图所示的简单编辑器。用户在文本框(text1)中输入正文后,选中某些文本时可进行\剪切\、\复制\和\粘贴\操作。假设在窗体声明部分定义了一个变量str1,用于保存复制和剪切的内容,请把剪切按钮(btnCut)的Click事件补充完整。 程序运行界面:

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

联系合同范文客服:xxxxx#qq.com(#替换为@)