欢迎来到天天文库
浏览记录
ID:40710576
大小:81.50 KB
页数:7页
时间:2019-08-06
《Exam05_2013VB程序设计与VBA应用期中考卷》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、浙江大学城市学院年级:_____________专业:___________________班级:________________学号:_______________姓名:__________________2012—2013学年第二学期期中考试试卷《VB程序设计基础与VBA应用》开课单位:计算分院;考试形式:闭卷;考试时间:2013年5月5日所需时间:120分钟一、单选题(30%,每小题1分)(1)一个对象可以执行的动作和可被对象识别的动作分别称为。A.事件、方法B.属性、方法C.方法、事件D
2、.过程、事件(2)在启动窗体时,为了初始化该窗体中的各控件,可选用窗体的事件。A.ClickB.DblClickC.LoadD.Unload(3)将VB编制的程序保存在磁盘上,至少会产生何种文件。A..vbp与.frmB..com与.exeC..bat与.frmD..doc与.txt(4)改变控件在窗体中的水平位置应修改该控件的属性。A.TopB.LeftC.WidthD.Right(5)以下条语句执行后将会删除文本框Text1中的文本?A.Text1.SelText=””B.Text1.Tex
3、t=””C.Text1.ClearD.Text1.SelText.Clear(6)下面是日期型常量。A."12/19/99"B.#12/19/99#C.12/19/99D.{12/19/99}(7)若x是一个正实数,对x的第3位小数四舍五入的表达式是。A.0.01*Int(x+0.005)B.0.01*Int(100*(x+0.005))对C.0.01*Int(100*(x+0.05))D.0.01*Int(x+0.05)(8)下列函数中,返回值是字符串的是。A.ChrB.InStrC.ValD
4、.Asc(9)假定flge是逻辑型变量,下面赋值语句中不正确的是。A.flge=0B.flge=”True”C.flge=3<4D.flge=’True’(10)不正确的VB常量是。A.123!B.&HABC&C.#1-1-03#D.&O18(11)表达式5Mod3+53的值等于。A.2B.3C.4D.5(12)要得到[1,50]之间的随机整数,可用式子。A.Int(50*Rnd)B.Int(49*Rnd)第7页共7页C.Int(49*Rnd)+1D.Int(50*Rnd)+1(13)先声明D
5、imXAsString*10,再赋值X=”浙江”,最后Len(X)的值为。A.2B.4C.10D.12(14)数学式(xy+5)1/3写成VB表达式是。A.(x*y+5)^1/3B.(x*y+5)^(13)C.(x*y+5)^(1/3)D.(xy+5)^(1/3)(15)语句OptionBase1,决定数组下标界。A.下界必须为1B.下界必须为0C.缺省的下界为1D.缺省的下界为0(16)定义数组Dima(3,4)后,在缺省状态下,使用将出现下标越界错误。A.a(1,1)B.a(3,0)C.a
6、(4,4)D.a(3,4)(17)以下条件语句错误的是。A.IfXThenY=Y+1B.IfX=0ThenY=0C.IfX>YThenPrintYEndIfD.IfX>0ThenY=1:PrintY(18)用Dimx,yAsBoolean语句声明变量,下列正确的是。A.x是变体型变量,y是布尔型变量B.x和y都是布尔型变量C.x是整型变量,y是布尔型变量D.x和y都是变体型变量(19)若变量i的初值为9,则下列循环语句的循环次数为次。DoWhilei<=21i=i+3LoopA.3次B.4次C.
7、5次 D.6次(20)下列属性是所有控件的公共属性。A.Name和TagB.Name和EnabledC.Name和WidthD.Name和Visible(21)下列不能判断整型变量x是5的倍数的表达式是。A.5Modx=0B.Int(x/5)=(x/5)C.x/5=x5D.xMod5=0(22)判断“Z比X、Y都大”的VB表达式为。A.Z>XOrZ>YB.Z>XAndYC.Z>XAndZ>YD.Z>X>Y(23)下列程序段的输出结果是。a=10:b=10000x=Log(b)/Log(a)Pr
8、int"lg(10000)=";xA.5B.lg(10000)=5C.4D.lg(10000)=4(24)x是Integer类型变量,无论x取何值,字符串表达式的长度为10。A.Space(10-Len(Str(x))+xB.Space(10-Len(Trim(Str(x))))+xC.Space(10-Len(x))&xD.Space(10-Len(Trim(Str(x))))&x第7页共7页(25)下面程序运行后的结果是。m=0Fori=1To10m=m+ii=i+1NextiPrintm,
此文档下载收益归作者所有