- 1、本文档共35页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
《VB程序设计》模拟题(一)
一、填空题(本大题共7小题,每空2分,共20分)
1.VisualBasic6.0的主要功能特点是具有面向对象的设计工具,非常适合于面向对象的编程方式。
答案:可视化的基于事件驱动
解释:VB提供的可视化,把Windows界面设计的复杂性“封装”起来。程序员不必再为界面的设计而编写大量的程序代码,只需按设计的要求,用系统提供的工具在屏幕上“画出”各种对象,VB自动产生界面设计代码,程序员所需要编写的只是实现程序功能的那部分代码,从而大大提高了编程的效率。
VB通过事件来执行对象的操作。在设计应用程序的时候,不必建立具有明显开始和结束的程序,而是编写若干个微小的子程序,即过程。这些过程分别面向不同的对象,由用户操作引发某个事件来驱动完成某种特定的功能,或由事件驱动程序调用通用过程来执行指定的操作。
2.VisualBasic6.0的控件分为3类,即:、ActiveX控件、可插入对象控件。
答案:常用控件
解释:常用控件是vb的基础,为可视化提供了方便快捷,也是最早较为人性化设计的程序之一。
3.滚动条响应的重要事件有和。
答案:Change、Scroll
解释:scroll事件是用来跟踪活动滑块的动态变化,change事件则用来获取滚动条当前的值。当拖动滚动条内的滚动滑块时,触发scroll事件,当改变活动滑块的位置时,就触发change事件。
4isualBasic中有一种控件组合了文本框和列表框的特性,这种控件是_。
答案:组合框
解释:组合框为visualBasic6.0的一种常用空间,具有文本框和列表框的共同特性。
5.在菜单编辑器中建立了一个菜单,名为pmenu,用语句可以把它作为弹出式菜单弹出。
答案:Form1.PopupMenupmenu
解释:VB中的菜单编辑器可以为每一个子菜单定义和命名,并能够通过如上代码控制菜单的显示与否,格式为:窗体名.方法对象。
6.在改变默认的驱动器,可以通过设置驱动器控件的_____属性;文件夹列表控件的当前路径被___属性所记录;文件列表控件中被选中的文件被____属性所记录。
答案:Drive、Path、FileName
解释:VB提供了快速简便的读取驱动器文件的方法,其属性是对应的英文单词,容易设置。
7.计时器控件能有规律的以一定时间间隔触发__事件,并执行该事件过程中的程序代码。
答案:Timer
解释:Timer是计时器最重要的属性,在Enable有效的情况下,用于有规律的记录时间。
二.选择题(本大题共20小题,每题2分,共40分)
1设窗体上有一个文本框,名称为text1,程序运行后,要求该文本框不能接受键盘输入,但能输出信息,以下属性设置正确的是:()
A)text1.maxlength=0 B)text1.enabled=false
C)text1.visible=false D)text1.width=0
答案:B
解释:文本框能否接收键盘输入的属性为:enable使能属性。Enable属性的输出为boolean量,因此,选择B。
2以下能在窗体Form1的标题栏中显示“VisualBasic窗体的语句是()
A)Form1.Name=VisualBasic窗体
B)Form1.Title=VisualBasic窗体
C)Form1.Caption=VisualBasic窗体
D)Form1.Text=VisualBasic窗体”
答案:D
解释:窗体的属性Name和Text分别表示窗体的名字和标题栏的标题。Title和Caption并不是窗体的属性,为干扰项。因此,选择D。
3在窗体上画一个名称为Text1的文本框,然后画一个名称为HScroll1的滚动条,其Min和Max属性分别为0和100。程序运行后,如果移动滚动框,则在文本框中显示滚动条的当前值,以下能实现上述操作的程序段是()
A)PrivateSubHScroll_Change()
Text1.Text=HScroll1.Value
EndSub
B)PrivateSubHScroll_Click()
Text1.Text=HScroll1.Value
EndSub
C)PrivateSubHScroll_Change()
Text1.Text=HScroll.Caption
EndSub
D)PrivateSubHScroll_Click()
Text1.Text=HScroll.Caption
EndSub
答案:A
解释:记录滚动条发生改变
文档评论(0)