2011年秋研究生VB期末试卷.doc

  1. 1、本文档共8页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
2011年秋研究生VB期末试卷

课程号:SG04002 《VB程序设计》考试试卷(A) 考试形式:闭卷考试 考试时间:120分钟 所有答案答在答题纸上 院系 学号 姓名 得分 题号 一 二 三 四 五 总分 一.判断题(正确划√,错误划×)(10分) 单选按钮控件分组原则是看控件是否在同一个容器里,和是否属同一控件数组无关 单击Frame1上的无效命令按钮是不会激发任何对象的单击事件的 程序运行时CommonDialog和PictureClip控件都没有可视的物理界面 对象的事件可以由用户操作引发也可以直接调用,但不会自动激发。 窗体的KeyPreview 属性为True,其上控件的所有键盘事件都会被窗体接收,控件就不再接收了 窗体的大小取决于ScaleHeight和ScaleWidth的值 动态数组可以改变上界和下界的大小,不能改变维数的大小 类是一种数据类型,所以滚动条和Line控件属于不同的类 函数不可以用Call调用 Do ~ Loop Until和Do ~ Loop While都是直到型循环 二.单项选择填空题(共40分) 下列控件中有caption属性A.B.ImageC.D.FrameA.B.C.D.A.B.Down C.D.属性A.B.FrameC.ScrollD.TimerA.ArrangeB.HideC.SetFocusD.ClsA.B.C.D.UnloadA.SB.C.D.A.B.C.D.A.On Error GoTo 0B.On Error Resume Next C.On Error GoToD.Resume NextA.AutoRedrawB.SavePicture C.StretchD.AutoSizeTimer控件的【 】属性Timer事件 A.EnabledB.Interval C.Visible D.PaintPicture方法可以对图片进行【 】 操作 A.B.C. D.A.OptionalB.PreserveC.Option BaseD Option Explicit 若要阻止一个窗体被卸载应对该窗体【 】事件编程 A.LostFocusB.PaintC.ResizeD.QueryUnloadLoad、②Terminate、③Initialize、④Unload发生的先后顺序为【 】 A.B.C.D.A.PasswordCharB.MultiLineC.MaxLength D.FontA.B.C.D.A.SelCountB.ListCountC.CountD.ListA.Rnd * 10B.Int(Rnd * 90 + 10)C.Int(Rnd * 10) D.Rnd * 90 + 10 A.InputBoxB.LCaseC.MsgBox D.RightCommand1后的程序运行结果(10分) Function a(x As Integer, Optional y = 3, Optional z) As Integer If IsMissing(y) Then a = x ^ 2 ElseIf IsMissing(z) Then a = x ^ y Else a = x * y * z End If End Function Private Sub Command1_Click() Print a(2), a(2, 4), a(2, 4, 5) End Sub Private Sub Command1_Click() Dim a() ReDim a(2 To 8) Print UBound(a) LBound(a) End Sub Sub c(ByVal x As Integer, ByRef y As Integer, ByRef m As Integer, ByVal n As Integer) m = x * y: n = x / y End Sub Private Sub Command1_Click() Dim i As Integer, j As Integer, a As Integer, b As Integer i = 2: j = 4: a = 6: b = 8 c j, i, a, b Print a, b End Sub Private Sub Comman

文档评论(0)

peain + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档