VB期中试.docVIP

上 海 金 融 ,,,, 院 《计算机应用基础（二）》 期中测验试卷（1） 专业 班级 姓名 成绩 一、单项选择题（每题1分，共10分） 1、在VB环境中，工程文件的扩展名是________。 A）frm B）bas C）vbp D）frx 2、在下列表达式中，正确的日期型常量是_____ A) 12/04/01 B) 12/04/01 C) {12/04/01} D) #12/04/01# 3、当X的值为7 时， VB表达式 13X and X=7的值是 。 A) True B) False C) .T. D) .F. 4、以下4类运算符中，优先级最低的是______ A) 算术运算符 B) 字符运算符 C) 关系运算符 D) 逻辑运算符 5、下列不属于程序的三种基本控制结构的是______ A) 顺序结构 B) 递归结构 C) 选择结构 D) 循环结构 6、若要退出Do…While循环，可使用的语句是______ A) Exit Do B) Exit C) Exit For D) Exit Sub 7、执行 PRINT 18/2*3；“,” ；-3^2 命令后,输出结果为______ A) 27 –9 B) 27 ； -9 C) 27 ， -9 D) –9 ， 27 8、可以同时删除字符串前导和尾部空格的函数是______ A) Ltrim B) Rtrim C) Mid D) Trim 9、表达式16 / 4 – 2 ^ 5 * 8 / 4 MOD 5 \ 2的值是 。 A) 14 B) 4 C) 20 D) 2 10、有代码Command1.Caption=“运行”,其中Command1是_______,Caption是_________,“运行”是_________,应选择下列哪一种组合。 A）对象,属性,值 B）方法,事件,属性 C）对象,方法,值 D)方法,对象,值 二、填空题(每题2分,共10分) 1、数,,,,式子sin480+(e10+ln10)/x2-y2+1的VB表达式是 2、表达式int(68.555*100+0.5)/100的功能是 3、写出“x、y之一,,,,于z”的VB表达式 4、写出计算离毕业还有多少天的VB表达式 （假设2012年7月1日毕业）。 5、循环语句 for i=-3 to 20 step 4 执行 次 三、阅读程序，回答问题（每,,,,题5分，共10分） 1. Private Sub Command1_Click() Dim m As Integer, n As Integer，t As Integer m = 20 : n = 3 If m n then t = m : m = n : n = t End If Do While n 0 r = m Mod n m = n n = r Loop print “m =” format(m, “##.##”) “n = ” n End Sub 问：①指出循环体是哪些语句？ ②写出程序的执行结果。（要求标出空格） 2、 Private Sub Command1_Click() Dim sum%,i% Dim a as string sum=0:a=”” for i=1 to 5 a=a 8 sum=sum+val(a) next i print “sum =”;sum End Sub 问：程序的功能是什么？ 四、程序填空（每个空格1分，13分） 1、程序功能是输入三角形的三条边的值，判断如果可以构成三角形，则计算三角形的面积，并判断组成的是等边三角形、等腰三角形或一般三角形；若不能构成三角形，则弹出提示信息框，提示信息为“出错，请重新输入”。请将下列程序补充完整。 Private Sub Form_click() Dim a!, b!, c!, t!, s!, k% a = Val(text1.text) b = Val(text2.text) c = Val(text3.text) If ___