- 1、本文档共7页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
2009年chun研究生VB期末试卷
2009年春研究生《VB程序设计》期末试题
学号 姓名 成绩
判断题(共10分)((正确划√,错误划×,答案写在【 】中))
【 】父窗口总是先于子窗口加载并先于子窗口卸载
【 】图像框控件中的图像可以随控件的大小自动缩放,图片框不具有此功能
【 】事件因系统自动或用户操作激发,绝不允许其他代码调用事件
【 】单选按钮控件总是成组出现,每组中只有一个控件被选中。分组原则是按名称而不是按控件所在的容器
【 】在VB中默认的实参和形参之间数据传递方式是传值
【 】通过通用对话框控件可以完成文件的打开和保存操作
【 】通用的过程没有返回值
【 】组合框比列表框的功能更强大
【 】窗体的ScaleTop和ScaleLeft属性决定了用户区域的大小
【 】控件的事件集是控件固有的,不能人为的添加或删改
单项选择填空题(共30分)(将答案写在【 】中)
当通过键盘直接在TextBox控件A.KeyPress B.KeyDownC.Click D.Change
A.B.C.D.value属性A.B.C.ScrollD.DriveList
当鼠标左右按钮同时按下时,下列事件激发两次的是【 】
A.ClickB.MouseDown C.MouseD.A.ActivateB.InitializeC.GotFocusD.PaintA.SetFocusB.MoveC.RefreshD.Scale A.unload meB.me.HideC.me.D.EndTop、②Width、③Left、④Height中控制控件大小的属性是【 】
A.B.C.D.
若要忽略程序运行过程中的错误应使用的语句是A.On Error GoTo 0B.On Error Resume Next C.Resume 0D.Resume Next。A.LoadB.SavePicture C.Shell D.LoadPictureTimer控件的【 】属性Timer事件
A.EnabledB.Interval C.Visible D.TagEnabled和【 】 属性同时为真
A.ForeColorB.Visible C.Caption D.AppearanceCircle语句不能绘制【 】
A.B.C.D.
若要强制系统对变量的使用遵循“先声明后使用”的原则,应加【 】
A.Option ExplicitB.ParamArrayC.Optional D.Option BaseTrue
A.AutoRedrawB.PictureC.AutoSize D.Stretch 题 pr用于检测数据m是否是素数,是返回真,否返回假。在Command1单击事件中调用该函数检测并输出了100至300之间的所有素数,数据按10个一行进行输出。请补充缺失代码。
Function pr(m As Integer) As Boolean
Dim k As Integer, i As Integer
k = Sqr(m)
For i = 2 To k
If 【 m mod i=0 】Then
Exit For
End If
Next i
If i=k Then
pr = False
Else
pr = True
End If
End Function
Private Sub Command1_Click()
Dim j As Integer, n As Integer
For j = 【100 to 300 】
If 【 pr[j] 】= True Then
Print (j),
【 n=n+1 】
If n Mod 10 = 0 Then
Print
End If
End If
Next
End Sub
下列程序的功能是从键盘输入多个评委为选手打出的成绩,统计并输出全部成绩、最高分(max)、最低分(min)和平均分()。程序如下,请将程序补充完整Sub pr1(n As Integer)
Dim sc() As Integer, k As Integer
Dim min As Integer, max As Integer
Dim s As Integer, i As Integer
redim sc(1 to n) 】
For i
文档评论(0)