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

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

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

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

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

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

年级:_____________专业:_____________________班级:_________________学号:_______________姓名:__________________ …………………………………………………………..装………………….订…………………..线……………………………………………………… 2011—2012学年第二学期期末考试试卷 《VB程序设计基础与VBA应用》 开课单位:计算分院;考试形式:闭卷;考试时间:2012年6月13日 所需时间:120分钟 一、单选题(26%,每小题1分) 1.下列叙述中,错误的是。 A.事件可以由用户触发,也可以由系统触发 B.VB应用程序只能以解释方式执行 C.保存VB程序时,应分别保存窗体及工程文件 D.打开一个工程文件时,系统自动装入与该工程有关的窗体、标准模块等文件 2.函数Int(45*Rnd)+5产生范围内的正整数? A.[0,50] B.[5,50] C.[5,49] D.[0,49] 3.下列叙述中不正确的是。 A.VBA只能用于Excel B.VBA来源于VB C.VBA必须与应用程序结合 D.VB可以独立开发应用程序 4.下列各组函数中,函数值类型相同的一组是。 A.Exp(x)、Left(x)、Ucase(x) B.Asc(x)、Int(x)、Len(x) C.Sgn(x)、Str(x)、Rtrim(x) D.Fix(x)、Chr(x)、Lcase(x) 5.表示x大于0且小于10的表达式是。 A.0<x<10 B.x>0Andx<10 C.x>0Orx<10 D.x>0:x<10 6.要判断在文本框中是否按了Enter键,应在文本框的事件中判断。 A.Change B.KeyDown C.Click D.KeyPress 7.设置EXCEL某个区域的内部颜色,需设置的ColorIndex属性。 A.ForeColor B.BackColor C.Interior D.Inside 8.表达式23+23Mod50\7的值是。 A.23 B.46 C.25 D.123 9.以下条件语句错误的是。 A.IfXThenY=Y+1 B.IfX=0ThenY=0 C.IfX>YThenPrintYEndIf D.IfX>0ThenY=1:PrintY 10.用Dimx,yAsBoolean语句声明变量,下列正确的是。 A.x和y都是布尔型变量 B.x是整型变量,y是布尔型变量 C.x是变体型变量,y是布尔型变量 D.x和y都是变体型变量 11.若变量i的初值为9,则下列循环语句的循环次数为次。 DoWhilei<=21 i=i+3 Loop A.3次 B.4次 C.5次 D.6次 12.Excel-VBA有多达100个以上的对象,这些对象构建了对象模型。以下对象哪个对象所处的层次最高? A.Range B.Workbooks C.WorkSheets D.Application 13.编辑修改VBA代码时,可以使用下列哪个快捷键。 A.CTRL+F11 B.SHIFT+F11 C.ATL+F11D.F11 14.在Excel中编制VBA程序时,会出现Excel的特有对象,下列是特有对象? A.ThisWorkBook B.MicrosoftExcel C.Sheet1至Sheet3 D.以上都是 15.在SelectCasex的语句中,判断x是否大于等于10小于等于20的是。 A.Casex>=10Andx=<20 B.Case10To20 C.Case10<=x<=20 D.CaseIs>=10,Is=<20 16.在用Dimx(2,6to9)所声明的数组中不包括下列元素。 A.x(2,6) B.x(1,9) C.x(0,7) D.x(1,4) 17.若某过程声明为Subaa(nAsInteger),则以下调用正确的是。 A.aa(y) B.Callaa() C.aay D.z=aa(y) 18.Sub过程与Function过程最根本的区别是。 A.前者可以使用Call或直接使用过程名调用,后者不可以 B.后者可以有参数,前者不可以 C.两种过程参数的传递方式不同 D.前者无返回值,但后者有 19.下面子过程语句说明合法的是。 A.Subf1(ByValn()AsInteger) B.Subf1(n()AsInteger)AsInteger C.Functionf1(nAsInteger) D.Functionf1(ByValn()AsInteger)AsInteger 20.在语句SubFact(nasInteger)中n是一个按传递的参数。 A.地址 B.值 C.变量 D.常量