- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
VisualBasic程序设计VisualBasic程序设计
郑州航空工业管理学院 2013 — 2014 学年第2学期
课程考试试卷
课程名称: Visual Basic程序设计 考试形式: 开卷
学号: 姓名:
说明:所有答案请答在规定的答题纸或答题卡上,答在本试卷册上的无效。
一、单项选择题(本题总计10分,每小题2分)
1. 启动Visual Basic后,VB为用户建立的第一个窗体是( B )
A. Form B. Form1
C. 窗体1 D. 窗体
2.窗体文件的扩展名是( D )。
A..bas B..vhp
C..exe D..frm
3. 决定窗体标题栏显示内容的属性是( C )。A.???? B.C.??? D.
A.age=20 And age=30 B.age=20 Or age=30
C.age=20 And age=30 D.age=20 Or age=30
5. 下面不属于软件开发工具的是( D )。
A.Visual Basic B.Delphi
C.Java D.Internet Explorer
二、简答题(本题总计40分)
1. 简述VB语言的特点。(5分)
1.面向对象2.事件驱动3.软件Software集成式开发4.结构化设计语言5.强大数据库访问功能6.支持对象链接和嵌入技术7.网络功能8.多个应用向导9.支持动态交换、动态链接技术..联机帮助功能VB6.0集成开发环境的主窗口包括:菜单栏,工具箱,窗体设计窗口,立即窗口,工具栏,工程资源管理器,属性窗口,窗体布局窗口.
VB 为我们提供了较为丰富的数据类型,主要的列表如下: Boolean 逻辑型Byte 字节型Integer 整数型Long 长整型Single 单精度型(实数)Double 双精度型(实数)Object 对象型Currency 货币型String 字符(串)型日期型数据(Date)变体型数据(Variant)字符串运算符(1)当一个表达式中的运算符不止一种时,优先级为:算术运算符字符串运算符关系运算符逻辑运算符。
(2)所有的关系运算符的优先级都相同,按照“左结合”顺序;
(3)对于算术运算符而言,顺序:乘幂运算负数运算乘除运算整除运算求余运算加减运算;
(4)对于逻辑运算符而言,顺序:非运算与运算或运算异或运算同或运算蕴含运算。
赋值语句1. IF条件语句 2. Select Case语句(情况语句) 3. 条件函数1.For循环语句 2.Do……Loop循环 3. 循环的嵌套
三、程序设计题(本题总计40分,每小题10分)
1. 在某书店购书,100元以下者8折优惠,100元以上者(包括100元)7折优惠。请编写程序,要求输入购书的金额,计算并输出应付金额。通过文本框Text1输入金额,在按钮的click事件中编程实现购书程序,应付款项在Text2中显示。
do case
case thisform.text1.value=100.00
thisform.text2.value=round(thisform.text1.value*0.7, value*0.8)
end casethisform.refresh
2.编写程序,任意输入一个整数,判定该整数的奇偶性。
Dim i as integer
i=text1.text
if i mod 2 =0 then
msgbox 偶数else
msgbox 奇数end if
3. 使用For循环语句计算1 + 3 + 5 + … + 99的值, 结果在Text1中显示。
Dim I As Integer, s As Integer
s=0
For i=1 To 99
s=s+i
Next i
Print s
4.使用Do Loop循环语句输出10~500之间能被6整除的数,结果在Text1中显示。
Private Sub Command1_Click() Dim i As Integer Me.Text1.Text = For i = 10 To 500 If i Mod 3 = 0 Then Me.Text1.Text = Me.Text1.Text i E
您可能关注的文档
- unit1 Where did you go on vacation sectionA period3.ppt
- unit1 Where did you go on vacation sectionA period1.ppt
- Unit1 What would you do.doc
- unit1 冀教版八年级英语导学案上册.doc
- unit1 Where did you go on vacation sectionB period2.ppt
- Unit1-12单元小结.doc
- Unit10 I’d like some noodles教案.doc
- Unit10 Where did you go on vacation 教案.doc
- unit10_Where_did_you_go_on_vacation_Period_3].ppt
- unit1_硕士英语综合教程_课文翻译.doc
最近下载
- 光伏电站运行常见故障及技术解决方案.pdf VIP
- 军队文职考试《公共科目》试题与参考答案(2024年).docx VIP
- 生成式AI在小学英语课堂中的应用:教师教学决策优化研究教学研究课题报告.docx
- 初二物理导学案-全一册.pdf VIP
- 邮政企业快递企业安全生产重大事故隐患判定标准解读.pdf VIP
- 人民大2023学术规范和论文写作PPT第2章 选:论文选题与研究设计.pptx VIP
- 2025年中国食品级碳酸氢钠数据监测报告.docx
- 能源与动力工程研究教授——程林同志事迹材料— .doc VIP
- 高中物理竞赛-话题5:多质点在动态多边形顶点的相遇问题和多解问题.doc VIP
- 《提升基层干部管理能力》课件.ppt VIP
文档评论(0)