期末模拟试题2及参考答案

《期末模拟试题2及参考答案》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、VB期末模拟试题2一、单项选择题（每题2分，共30分）1.以下控件屮不是标准控件的是（A.水平滚动条和垂直滚动条B.C.D.2.A.3.A.4.A.C.5.)oActiveX控件文件列表框、冃录列表框和驱动器列表框OLE容器在VisualBasic+,要使一个窗体不可见，但不从内存屮释放，应使用的语句是（ShowB.HideC・LoadD.UnLoandVisualBasic在程序开发过程中用丁•使用窗体或控件对象的属性是（NameB.CaptionC.TextD.Enabled以下事件中，不是鼠标事件的是（DragDropB・MouseDownDbClickD.Change下曲哪个属性

2、不是标签控件的属性（B.BorderStyleD.Text)o)oA.AlignmentCaption下而哪个方法是控件获得焦点的方法GotFocusB.LostFocusSetFocusD.Click在VisualBasic中，下属（）控件可以包含其他控件。ImageB.TextBoxFrameD・CheckBoxC.6.A.C.7.A.C・)o)o8.假定窗体上有一个Text文本框，为使它的文本内容右对齐并且没有边框，则正确的属性设备为（A.Textl.Alignment=lTextl.BorderStyle=0C.Text1.Alignment=1Text1.BorderStyle

3、=1)oB.Text1.Alignment=2Text1.BorderStyle=1D・Text1.Alignment=2Text1.BorderStyle=()9.下列哪些方法是将项口添加到ComboBox控件中（）。A.ListB.ListindexC・AdditemD.Move10.每当窗休失去焦点时会触发的事件是（A.ActiveB.DeactiveC-LostFocusD.Initialize11.（）函数判断文件指针是否到了文件结束标志；（）函数返回文件的字节数；（）语句用于设置对文件“锁定”；（）A.EOF、LOF、Lock、UnlockC.EOF、LOF、Unlock、L

4、ock12.顺序文件的读操作通过下列（A.Input#和Read#C.Get#和Input##)o语句用于设置对文件“解锁”。B.LOF、EOF、Lock、UnlockLockD.LOF、EOF.Unlocks)语句可以实现。B.Read#和Get#D.Linelnput#和Input13.如果准备读文件,打开顺序文件"text.dat"的正确语句是（A.Open"text.dat/'ForWriteAs#1B.Open"text,dat/'ForInputAs#1C.Open"text.dat"ForBinaryAs#1D.Open"text.dat"ForRandomAs#114.如

5、果准备向随机文件中写入数据，正确的语句是()A.Print#1,recB.Write#1,recC.Put#1,,recD・Get#1,,rec15.当改变驱动器列表框中的鞭动器时，为了使目录列表框中的内容同步跟着改变，应当()A.在DirlChange()事件中加入代码Dirl.Path二Drivel.DriveB.在Dirl_Channge()事件中加入代码Drivel.Drive=Dirl.PathC.在Dirvel_Channge()事件中加入代码Dirl.Path二Drivel.DriveD.在Dirvel_Channge()事件中加入代码Drivel.Drive=Dirl.P

6、ath二、填空题(每空2分，共20分)1.在VisualBasic'P设置或修改一个对象的属性的方法有两种，它们分别是和在代码窗口编程。2.VisualBasic-般用4种类型的文件保存，分别是扩展名为的窗体文件，扩展名为.bas的标准模块文件，扩展名为的类模块文件和扩展名为.vbp的工程文件。3.VisualBasic语言提供了大量的內部函数方便程序开发人员编写程序，大体上可以分为函数、数学函数、日期时间函数、函数和函数等五类。4.在VisualBasic中，“公共对话框”控件还提供打卬设置对话框。使用“公共对话框”控件的方法來显示“打印"对话框。5.多重窗体指在应用中有多个窗体，各窗

7、体之间没有绝对的关系，但存在着出现的先示顺序和的关系。6.在一个含有多重窗体的应用程序小，经常需要在启动程序时先执行一个特定的启动过程,以便先对一些数据信息进行初始化后，再根据这些数据信息显示窗体。在VisualBasic«

8、«,将这个特定的过程命名为c三、阅读程序题(共24分)1.PrivateSubCommandl_Click()x=0DoWhilex<20x二(x+1)*(x+3)n=n+1LoopText1.Text=Str