预览加载中,请您耐心等待几秒...
1/5
2/5
3/5
4/5
5/5

在线预览结束,喜欢就下载吧,查找使用更方便

如果您无法下载资料,请参考说明:

1、部分资料下载需要金币,请确保您的账户上有足够的金币

2、已购买过的文档,再次下载不重复扣费

3、资料包下载后请先用软件解压,在使用对应软件打开

-- 试卷 编号: 郑州航空工业管理学院2013—2014学年第2学期 课程考试试卷 课程名称:VisualBasic程序设计考试形式:开卷 学号:姓名: 说明:所有答案请答在规定的答题纸或答题卡上,答在本试卷册上的无效。 一、单项选择题(本题总计10分,每小题2分) 1.启动VisualBasic后,VB为用户建立的第一个窗体是(B) A.FormB.Form1 C.窗体1D.窗体 2.窗体文件的扩展名是(D)。 A..bas B..vhp C..exe D..frm 3.决定窗体标题栏显示内容的属性是(C)。 A.TextB.Name C.CaptionD.BackStyle 4.表示年龄(age)在20岁到30岁之间的表达式是(A)。 A.age>=20Andage<=30B.age>=20Orage<=30 C.age<=20Andage>=30D.age<=20Orage>=30 5.下面不属于软件开发工具的是(D)。 A.VisualBasicB.Delphi C.JavaD.InternetExplorer 二、简答题(本题总计40分) 1.简述VB语言的特点。(5分) 1.面向对象 2.事件驱动 3.软件Software集成式开发 4.结构化设计语言 5.强大数据库访问功能 6.支持对象链接和嵌入技术 7.网络功能 8.多个应用向导 9.支持动态交换、动态链接技术. 10.联机帮助功能 2.VisualBasic系统的集成开发环境包括哪几个窗口?(7分) VB6.0集成开发环境的主窗口包括:菜单栏,工具箱,窗体设计窗口,立即窗口,工具栏,工程资源管理器,属性窗口,窗体布局窗口. 3.VisualBasic语言有哪几种常用的标准数据类型?对应的关键字是什么?(7分) VB为我们提供了较为丰富的数据类型,主要的列表如下:Boolean'逻辑型 Byte'字节型 Integer'整数型 Long'长整型 Single'单精度型(实数) Double'双精度型(实数) Object'对象型 Currency'货币型 String'字符(串)型 日期型数据(Date) 变体型数据(Variant) 4.VisualBasic语言有哪几种运算符?指出它们的运算优先级。(6分) 算数运算符关系运算符字符串运算符逻辑运算符 (1)当一个表达式中的运算符不止一种时,优先级为:算术运算符>字符串运算符>关系运算符>逻辑运算符。 (2)所有的关系运算符的优先级都相同,按照“左结合”顺序; (3)对于算术运算符而言,顺序:乘幂运算>负数运算>乘除运算>整除运算>求余运算>加减运算; (4)对于逻辑运算符而言,顺序:非运算>与运算>或运算>异或运算>同或运算>蕴含运算。 5.结构化程序设计有哪三种基本结构,在VisualBasic中有哪些语句实现这三种结构?(5分) 基本结构:顺序结构、选择结构和循环结构 顺序结构赋值语句 选择结构1.IF条件语句2.SelectCase语句(情况语句)3.条件函数 循环结构1.For循环语句2.Do……Loop循环3.循环的嵌套 6.请描述用VB进行可视化编程的一般步骤。(10分) 设计界面、设置属性、编写代码 1、新建工程 2、添加控件:拖动、双击 3、设置属性:设置窗体属性、控件属性 4、编写代码 5、调试、修改、运行 6、保存工程 三、程序设计题(本题总计40分,每小题10分) 1.在某书店购书,100元以下者8折优惠,100元以上者(包括100元)7折优惠。请编写程序,要求输入购书的金额,计算并输出应付金额。通过文本框Text1输入金额,在按钮的click事件中编程实现购书程序,应付款项在Text2中显示。 docase casethisform.text1.value>=100.00 thisform.text2.value=round(thisform.text1.value*0.7,value*0.8) endcasethisform.refresh 2.编写程序,任意输入一个整数,判定该整数的奇偶性。 Dimiasinteger i=text1.text ifimod2=0then msgbox"偶数" else msgbox"奇数" endif 3.使用For循环语句计算1+3+5+…+99的值,结果在Text1中显示。 DimIAsInteger,sAsInteger s=0 Fori=1To99 s=s+i Nexti Prints 4.使用DoLoop循环语句输出10~500之间能被6整除的数,结果在Text1中显示。 PrivateSubCommand1_Click()DimiAsIntegerMe.Text1.Text=""Fori=1