地大2010年秋研究生vb期末试卷带答案

《地大2010年秋研究生vb期末试卷带答案》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、.课程号：SG04002《VB程序设计》考试试卷（A）考试形式：闭卷考试考试时间：120分钟所有答案答在答题纸上院系学号姓名得分题号一二三四五总分一．判断题（正确划√，错误划×）（10分）1.方法的实质是程序代码模块√2.MDI和SDI窗体支持相同的事件和方法3.程序运行中通过代码改变单选按钮的Value值是不会触发该控件的单击事件的4.若某子窗体拥有菜单，程序运行时一旦它获取焦点就会自动覆盖父窗口的菜单5.利用通用对话框控件可以直接完成图形文件的保存或打开操作，无法直接完成文本文件的保存或打开操作6.由一个父窗口和多个子窗口构成的应用程序，关闭父窗口就可以终止程

2、序运行√7.若窗口的Enabled属性为False，其上的控件也不再响应鼠标事件了。√8.控件数组中的元素可以由不同类型的控件构成9.Me.ForeColor=vbWhite与Me.ForeColor=RGB(0,0,0)等价10.AutoRedraw属性是窗体独有的属性二．单项选择填空题（共40分）1．按Delete键在TextBox控件中删除文本时下列那个事件不会触发【】A．ChangeB．KeyDownC．KeyUpD．KeyPress2．下列控件中有Text属性的是【】A．滚动条B．ImageC．组合框D．Frame3．下列控件中无value属性的是【】A

3、．CheckBoxB．OptionButtonC．ScrollBarD．ListBox4．下列控件中无Caption属性的是【】A．LabelB．FrameC．CommandButtonD．Timer5．对于一个正常显示的窗口来说下列【】事件是最后发生的A．UnloadB．QueryUnloadC．TerminateD．LostFocus6．下面【】方法可以直接使组合框控件具有输入焦点A．SetFocusB．RemoveItemC．RefreshD．AddItem7．在列表框L中删除第二条列表条目的值应使用【】语句A．L.RemoveItem2B．L.Remove

4、ItemC．L.RemoveItem1D．L.RemoveItem0...1．下列【】语句可以完成随机文件的写操作A．PutB．WriteC．GetD．Print2．若要处理程序运行过程中的错误应使用【】语句先捕获错误A．OnErrorGoTo0B．OnErrorResumeNextC．OnErrorGoTo语句行号D．ResumeNext3．在VB中保存一个图形、图像文件应使用【】。A．PictureSaveB．SavePictureC．LoadPictureD．PictureLoad4．Timer控件的【】属性不为0时可以激发Timer事件A．EnabledB

5、．IntervalC．VisibleD．Tag5．一个控件可以正常接收和处理事件必须保证Visible和【】属性同时为真A．EnabledB．FocusC．MoveableD．Appearance6．Circle语句不能绘制【】A．扇B．弧C．椭圆D．圆角正方形-7．若要隐藏某窗体应使用【】A．me.HideB．Me.Appearance=FalseC．Me.BorderStyle=NoneD．Me.WindowState=08．若要使窗体先于其上控件获取键盘输入，应将窗体的【】设置为TrueA．AutoRedrawB．MDIChildC．AutoSizeD．Ke

6、yPreview9．应使用【】属性为文本框设置掩码A．PasswordCharB．MultiLineC．MaxLengthD．Font10．设置【】属性可使文本框接收多行文字A．ScrollBarsB．MultiLineC．MaxLengthD．Width11．【】属性标记列表框中列表条目的数目A．SelCountB．ListCountC．CountD．List12．下列【】属性不是只读属性A．SelCountB．ListCountC．CurrentXD．AddItem13．若要使SDI窗体成为子窗体，应将窗体的【】属性设置为TrueA．BorderStyleB．

7、MDIChildC．AppearanceD．Moveable三．阅读下面程序，写出单击Command1后的程序运行结果（10分）1.Functions(ParamArraya())AsIntegerDimcAsInteger,mAsIntegerDimvAsVariantForEachvInam=m+vc=c+1Nexts=cEndFunctionPrivateSubCommand1_Click()Prints(10,20,30)EndSub(3)2.PrivateSubCommand1_Click()DimmAsInteger,nAsIntegerm=20:n=

8、10Cm,