如果您无法下载资料,请参考说明:
1、部分资料下载需要金币,请确保您的账户上有足够的金币
2、已购买过的文档,再次下载不重复扣费
3、资料包下载后请先用软件解压,在使用对应软件打开
大学VB试卷系20级专业班学号:姓名:-----------------------------------------------------------装------------------订------------------线----------------------------------------------------课程名称:出卷教师:适用班级:时量:分钟20~20学年第学期闭卷考试机考第页共NUMPAGES4页制卷日期:200年月日VB程序设计题号一二三四五六七八九十十一十二总分合分人复核人得分一、程序选择题得分评卷人复核人1.下列正确的日期常量是()。A.“3/1/09”B.2/12/05C.#8/23/08#D.{2/1/02}2.以下语句的输出结果是()。Printformat(32548.5,”###,###.##”)A.32548.5B.032,548.50C.32,548.5D.32,548.503.AND、OR、NOT三个运算符中,优先级最低的是()。A.ANDB.NOTC.ORD.AND、OR均最低4.以下不合法的常量是()。A.15^2B.2010C.100.0D.16.8E+015.函数PrintUCase(Mid("visualbasic",8,5))的值是()。A.visualB.basicC.VISUALD.BASIC6.产生[10,37]之间的随机整数的表达式是()。A.Int(27*Rnd(1))+10B.Int(28*Rnd(1))+10C.Int(27*Rnd(1))+11D.Int(28*Rnd(1))+117.设a=5,b=4,c=3,d=2,表达式a+2>2*bOra=cAndb<>cOrc>d的值是()。A.1B.TrueC.FalseD.28.在窗体Form1上有两个文本框Text1和Text2及一个命令按钮Command1,并有如下事件过程。程序运行时,在文本框Text1中输入123,文本框Text2中输入321,然后单击命令按钮,则输出结果为()。PrivateSubCommand1_Click()a=Val(Text1.Text)+Val(Text2.Text)PrintaEndSubPrivateSubForm_Load()Text1.Text=""Text2.Text=""EndSubA.444B.321123C.123321D.1322319.在窗体Form1上有一个命令按钮Command1,有如下事件过程。当程序运行时,单击命令按钮,先后在两个输入框中输入123和321,则输出结果为()。PrivateSubCommand1_Click()a=Val(Inputbox("请输入a"))b=Val(Inputbox("请输入b"))Printa+bEndSubA.444B.321123C.123321D.13223110.为了防止用户随意将光标置于控件上,应()。A.将控件的TabIndex属性设置为0B.将控件的TabStop属性设置为TrueC.将控件的TabStop属性设置为FalseD.将控件的Enabled属性设置为False11.在窗体中添加一个文本框,然后编写如下两个事件过程,程序运行后,单击窗体在文本框中显示的内容是()。PrivateSubForm_click()Text1.text="VB"&"program"EndsubPrivatesubtext1_change()Text1.text="程序设计"EndsubA."VB"&"program"B.VBprogramC.程序设计D.程序设计VBprogram12.在一个语句行内写多条语句,语句之间应该用()分隔。A.逗号B.分号C.顿号D.冒号13.窗体中添加一个命令按钮,编写如下程序,程序执行结果是()。privatesubcommand1_click()a=”ABCD”:b=”efgh”c=LCASE(a):d=UCASE(B)printc;dendsubA.abcdEFGHB.abcdefghC.ABCEefghD.ABCDEFGH14.下列程序段的执行结果为()。A=0:B=1A=A+B:B=A+B:PrintA;BA=A+B:B=A+B:PrintA;BA=A+B:B=A+B:PrintA;BA.1235813B.1135813C.1334813D.12345615.A