计算机二级VB考试题目.doc

一、单项选择题（每小题1.5分，共48分）1以下不属于Visual Basic的工作模式是_b_。（A）编译（B）设计（C）运行（D）中断2若要使标签控件显示时不覆盖其背景内容，要对_d_属性进行设置。（A）BackColor（B）BorderStyle（C）ForeColor（D）BackStyle3当运行程序时，系统自动执行启动窗体的_a_事件过程。（A）Load（B）Click（C）UnLoad（D）GotFocus4.下面_a_是合法的单精度变量。（A）num!（B）sum%（C）ABC（D）mm#5表达式DateDiff（“y”, #12/30/1999#, #1/13/2000#）语句显示的结果是_c_。（A）1（B）11（C）14（D）996数学关系式3x10表示成正确的VB表达式为_b_。（A）3=x10（B）3=x and x10 （C）3=x or x10（D）3=x and y,x,y)（B）If xy Then Max=x else Max=y（C）Max=x（D）If y=x Then Max=yIf y=x Then Max=y Max=x9下列程序段运行结果为_b_。For I=3 to 1 step 1 Print Spc(5-I);For j=1 to 2*I-1 Print “*”;Next jPrint Next I（A） * （B） * * * *（C） * （D）* * * * *（B）Private Sub Command1_Click() n = 5: x = 1: i = 1 Do x = x * i i = i + 1 Loop While i n Print xEnd Sub10. 以下能正确计算n!的程序是_D_（A）Private Sub Command1_Click() n = 5: x = 1 Do x = x * i i = i + 1 Loop While i n Print xEnd Sub（C）Private Sub Command1_Click() n = 5: x = 1: i = 1 Do x = x * i i = i + 1 Loop While i = n Print xEnd Sub11如下数组声明语句，_B_正确。（A）Dim a3,4 As Integer（B）Dim A(3,4) As Integer （C）Dim A(n,n) As Integer（D）Dim A(3 4) As Integer 12如下数组声明语句中，数组a包含元素的个数为_。Dim a(3,-2 to 2,5)（A）120（B）75（C）60（D）1313以下程序输出的结果是_D_。Dim aa=array(1,2,3,4,5,6,7)For I=lbound(a) to ubound(a) a(i)=a(i)*a(i)Next IPrint a(i)（A）49（B）0（C）不确定（D）程序出错14在程序代码中将图片文件pic.jpg装入图片框Picture1的语句是_B_。（A）Picture1.picture=pic.jpg（B）Picture1.picture=LoadPicture(pic.jpg)（C）Picture1.image=pic.jpg（D）LoadPicture(pic.jpg)15对于控件数组，下列描述中不正确的是_A_。（A）控件数组可由多个控件组成，这些控件具有相同的名字（B）可以通过把两个同类控件的name属性改成相同值来创建控件数组（C）控件数组中的各元素共用事件，通过Index参数来确定是哪一个元素（D）控件数组中的元素可以是不同类型的控件16设有程序代码如下：Form1.Caption=Visual Basic则：Form1，Caption和Visual Basic分别代表_C_。（A）对象，值，属性（B）对象，方法，属性（C）对象，属性，值（D）属性，对象，值17下列_B_表达式是不正确的。（A）计算机 + 与程序设计（B）计算机 + 150（C）计算机 & 150（C）计算机 & 与程序设计18Visual Basic是一种面向对象的可视化程序设计语言采取了_A_的编程机制。（A）事件驱动（B）按过程顺序执行（C）从主程序开始执行（C）按模块顺序执行19Visual Basic是一种面向对象的程序设计语言，_A_不是面向对象系统所包含的三要素。（A）变量（B）事件（C）属性（D）方法20保存新建的工程时，默认的路径是_B_。（A）My documents（B）VB98（C）（D）Windows21文本框没有_D_属性。（A）Enable（B）Visible（C）BackColor（D）Caption22要使Print方法在Form_Load事件中起作用，要对窗体的_C_属性进行设置。（A）BackColor（B）ForeColor（C）AutoRedraw（D）Caption23在一行中写多条语句时，每条语句之间用_B_符号分隔。（A） ，（B） ：（C） 、（D） ；24下面_A_是合法的变量名。（A）x_yz（B）123abc（C）integer（D）x-y25下面_B_是合法的字符常数。（A）ABC$（B）”ABC”（C）ABC（D）ABC26表达式Len(” 123程序设计ABC”)的值是_A_。（A）10（B）14（C）20（D）1727下面正确的赋值语句是_C_。（A）x+y=30（B）y=*r*r（C）y=x+30（D）3y=x28为了给x，y，z三个变量赋初值1，下面正确的赋值语句是_A_。（A）x=1:y=1:z=1（B）x=1,y=1,z=1（C）x=y=z=1（D）xyz=129VB提供了结构化程序设计的三种基本结构，三种基本结构是_D_。（A）递归结构、选择结构、循环结构（B）选择结构、过程结构、顺序结构（C）过程结构、输入输出结构、转向结构（D）选择结构、循环结构、顺序结构30下面程序段运行后，显示的结果是_B_。Dim x%If x=0 Then Print x Else Print x+1（A）1（B）0（C）x（D）x+131下面程序段运行后，显示的结果是_A_。Dim xX=Int(Rnd)+5Select Case xCase 5Print “优秀”Case 4Print “良好”Case 3Print “通过”Case ElsePrint “不通过”End Select（A）优秀（B）良好（C）通过（D）不通过32下列循环语句能正常结束循环的是 D 。（A）I=5 （B）I=1 Do Do I=I+1 I=I+2 Loop Until I0 Loop Until I=10 （C） I=10 （D）I=6 Do DoI=I+1 I=I-2 Loop Until In_ then t=m:m=n:n=tr=m mod ndo while _(18)_r0_ m = n n = r r = m Mod nloopPrint “最大公约数：”，nPrint “最小公倍数：”，_(19)_m1*n1/n_End Sub11下面程序段显示_(20)_4个“*”。For i=1 to 5 For j=2 to i Print “*”; Next jNext i一、单项选择题（每小题1.5分，共48分） (1) A (2) D (3) A (4) A (5) C (6) B (7) C (8) D (9) B (10) C (11) B (12) A (13) A (14) B (15) D (16) C (17) B (18) A (19) A (20) B (21) D (22) C (23) B (24) A (25) B (26) B (27) C (28) A (29) D (30) A (31) A (32) D 二、填空题（1-8空每空分，9-20空每空2分，共32分）(1) rem或 (2) _ (3) : (4) style (5) 33 (6) msgbox() (7) 字符型 (8) Val() (9) (x mod 10)*10+x10 (10) len(a) (11) d (12) int(rnd*61)+40(13) string(a(i)2,“*”) (14) a(i,i)=1 (15) i-1 (16) a(i-1,j) (17) mn (18) r0 (19) m1*n1/n (20) 10 计算机水平考试模拟试题一（VB）一、选择题（40分，共25题） 1、 多选题下列方法中，能修改组合框的项目是_。 （A）、Erase （B）、RemoveItem （C）、Delete （D）、AddItem （E）、Index 2、 单选题使用_方法能删除列表框控件中的某个项目。 （A）、Cls （B）、Clear （C）、RemoveItem （D）、DelItem 3、 单选题可以同时删除字符串前导和尾部空白的函数是_。 （A）、Ltrim （B）、Trim （C）、Rtrim （D）、Mid 4、 单选题在窗体上画一个命令按钮，然后编写如下事件过程： Prevate Sub Command1_Click() x = 0 Do Until x = -1 a = InputBox(请输入A的值) a = Val(a) b = InputBox(请输入B的值) b = Val(b) x = InputBox(请输入x的值) x = Val(x) a = a + b + x Loop Print a End Sub 程序运行后，单击命令按钮，依次在输入对话框中输入5、4、3、2、1、-1，则输出结果为_。 （A）、15 （B）、2 （C）、3 （D）、14 5、 单选题为了在运行时能显示窗体左上角的控制框(系统菜单)，必须_。 （A）、把窗体的ControlBox属性设置为False,同时把BorderStyle属性设置为非0值 （B）、把窗体的Contro1Box属性设置为False,其他属性任意 （C）、把窗体的ControlBox属性设置为True,并且把BorderStyle属性设置为1-5 （D）、把窗体的ControlBox属性设置为True,同时把BorderStyle属性设置为0值 6、 单选题用于动态地在菜单中增加菜单项的语句是_。 （A）、Load （B）、Unload （C）、LoadMenu （D）、UnloadMenu 7、 单选题要使文本框获得输入焦点，应采用文本框控件的_方法。 （A）、GetFocus （B）、LostFocus （C）、KeyPress （D）、SetFocus 8、 单选题函数调用不可以_。 （A）、作为另一个函数的形参 （B）、出现在一个表达式中 （C）、作为另一个函数的实参 （D）、出现在一个执行语句中 9、 单选题在程序运行期间，如果拖动滚动条上的滚动块，则触发的滚动条事件是_。 （A）、Scroll （B）、ove （C）、GetFocus （D）、Change 10、 单选题InputBox函数返回值的类型为_。 （A）、数值或字符串(视输入的数据而定) （B）、数值 （C）、字符串 （D）、变体 11、 单选题在窗体上面画一个命令按钮，然后编写如下事件过程： Option Base 1 Private Sub Command1_Click() Dim a a = Array(1, 2, 3, 4) j = 1 For i = 4 To 1 Step -1 s = s + a(i) * j j = j * 10 Next i Print s End Sub 运行上面的程序，单击命令按钮，其输出结果是_。 （A）、4321 （B）、12 （C）、34 （D）、1234 12、 单选题以下关于函数参数的说法中，正确的是_。 (A）、实参与其所对应的形参共占用一个存储单元 （B）、实参与其所对应的形参各占用独立的存储单元 （C）、只有当实参与其所对应的形参同名时才共占用存储单元 （D）、实参与其所对应的形参视其参数传递方式来确定是否各自占用独立的存储单元13、 单选题下列可以打开立即窗口的操作是_。 （A）、Ctrl+E （B）、Ctrl+D （C）、Ctrl+F （D）、Ctrl+G 14、 多选题语句If a=1 Then b=1，下列说法正确的是_。 （A）、b=1为赋值语句 （B）、a=1为关系表达式 （C）、a=1为赋值语句 （D）、b=1为关系表达式 15、 单选题在窗体上添加一个名为Command1的命令按钮和两个名为Label1、Label2的标签，程序代码如下： Private x As Integer Private Sub proc(ByVal a As Integer,ByVal b As Integer) x=a*a y=b+b End Sub Private Sub Command1_Click() x=5 y=3 Call proc(x,y) Label1.Caption=x Label2.Caption=y End Sub 程序运行后，单击命令按钮，两个标签中显示的内容分别是_。 （A）、25和6 （B）、25和3 （C）、5和6 （D）、5和3 16、 多选题关于复选框的说法正确的是_。 （A）、复选框的Value属性值为1时表示未选中 （B）、复选框的Value属性值为0时表示选中 （C）、复选框的Value属性值可以取两个值 （D）、复选框的Value属性值可以取三个值 （E）、复选框的Value属性值为1时表示选中 17、 单选题设 a=10，则执行x=iif(a7,-1,0)后，x的值是_。 （A）、-1 （B）、7 （C）、10 （D）、0 18、 单选题在窗体上画一个命令按钮（名称为Command1）编写如下事件过程： Private Sub Command1_Click() b = 1 c = 3 Print a = b + c End Sub 程序运行后，单击命令按钮，输出的结果是_。 （A）、False （B）、a=3 （C）、a=b+c （D）、3 19、 单选题下列事件中，_事件不可能在窗体对象中发生。 （A）、Change （B）、Click （C）、Load （D）、Dbclick 20、 单选题为了防止用户使用Tab键选定控件，应该_。 （A）、 将控件的TabIndex属性设置为0 （B）、 将控件的TabStop属性设置为False （C）、 将控件的TabStop属性设置为0 （D）、 将控件的Enabled属性设置为False 21、 单选题设有如下类型声明： Type Person Name As String * 8 Major As String * 20 End Type 要将该类型的某个变量p的值写入一个随机文件D:Test4.dat中，能正确把数据写入该随机文件的程序段是_。 （A）、Open D:Test4.dat For Random As #1 : Get #1, 1, p : Close #1 （B）、Open D:Test4.dat For Random As #1 : Put #1, 1, p : Close #1 （C）、Open D:Test4.dat For Random As #1 Len=Len(p) : Put #1, 1, p : Close #1 （D）、Open D:Test4.dat For Random As #1 Len=Len(p) : Get #1, 1, p : Close #1 22、单选题对窗体编写如下代码： Option Base 1 Private Sub Form_KeyPress(KeyAscii As Integer) a = Array(237, 126, 87, 48, 498) m1 = a(1) m2 = 1 If KeyAscii = 13 Then For I = 2 To 5 If a(I) m1 Then m1 = a(I) m2 = I End If Next I End If Print m1 Print m2 End Sub 程序运行后，按回车键，输出结果为_。 （A）、498 5 （B）、498 4 （C）、48 4 （D）、237 1 23、单选题为了在按下回车键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True，这个属性是_。 （A）、Enabled （B）、Value （C）、Default （D）、Cancel 24、多选题DataTime是一个日期类型的变量，以下赋值语句中正确的是_。 （A）、 DataTime=#5/14/01# （B）、 DataTime=#12:15:00 AM# （C）、 DataTime=#September 1, 2001# （D）、 DataTime=8/8/99 25、 多选题Visual Basic的Sub过程可以分为两大类，包括_。 （A）、 类模块 （B）、 通用过程 （C）、 事件过程 （D）、 Function过程 二、组合选择（20分，共10题）26、程序运行时，下列控件_D_在窗体上自动不可见。27、Visual Basic 6.0集成开发环境包括主窗口、_N_、布局窗口、工程资源管理器、属性窗口和窗体设计器六个部分。28、Visual Basic中用_A_语句来进行数据类型的自定义。29、根据编码方式不同，Visual Basic中可以把文件分为_M_ 。30、Visual Basic 程序设计语言属于_S_。31、Visual Basic 6.0用于开发_C_环境下的应用程序。32、下列_E_式子能生成一个1 ,100之间的随机整数。33、下列_R_控件不具有Caption属性。34、要想在文本框中显示滚动条，必须设置文本框_K_的属性。35、若要把一个窗体隐藏，可以使用_L_方法来实现。注意：请在试题的红色下划线处填写答案前所对应的字母，如“(D) Style”，只能填写英文字母“D”（大小写均可，必须在英文输入状态下输入），不能填写“Style”，否则作错误作答处理，填完后按回车键可转到下一题。可供选择的答案如下：（A） Dim （B） 面向过程的语言 （C） Windows （D） 通用对话框控件(CommonDialog) （E） Int(Rnd * 100)+1 （F） Int(Rnd * 100) （G） DOS （H） TextBox （I） Label （J） ScrollBars （K） ScrollBars和 Multiline （L） Hide （M） 二进制文件和ASCII文件 （N） 工具箱 （O） Type （P） UnLoad （Q） 命令按钮(CommandButton) （R） 状态栏 （S） 面向对象的语言 （T） 顺序文件和随机文件三、判断题（10分，共10题）36、 假设变量boolVar是一个布尔型变量，则赋值语句boolVar=.True.是否正确。 正确错误 37、 语句x=Sqr(-1)是错误的。 正确错误 38、 下列关于数组的说法是否正确：在同一过程中，数组名可以和简单变量名同名。 正确错误 39、 关于组合框的叙述，下列说法是否正确：下拉组合框在缺省情况下，包括一个下拉式列表和一个文本框。可以从列表选择或在文本框中输入。 正确错误 （P155） 40、 下面关于Tab顺序的说法，是否正确：TabStop属性已置为false的控件，在实际Tab键顺序中也被删除。 正确错误 41、 下面的过程定义语句是否合法:Sub Proc(ByVal n()。 正确错误 （说明：如果形参是数组，必须是传址） 42、 在Select Case语句中，下列说法是否正确：一个Case语句只能对应一个值。 正确错误 43、 关于组合框的叙述，下列说法是否正确：下拉式列表框样式的组合框允许用户输入。 正确错误 （P155） 44、 语句Dim arr(1 to 5, 2 to 7,3 to 8)定义的数组元素个数是：100。 正确错误 45、 下面关于Tab顺序的说法，是否正确：设置TabIndex属性将改变一个控件的Tab键顺序。 正确错误 计算机水平考试模拟试题二（VB）一、选择题（40分，共25题）1、 多选题Visual Basic中注释语句的前缀可以是_。 （A）、 单引号 （B）、 逗号 （C）、 Rem （D）、 分号 2、 单选题下列程序的输出结果是_。 Private Sub Command1_Click() a=8:b=9 Print a=b End Sub （A）、 显示出错信息 （B）、 False （C）、 8 （D）、 9 3、 多选题下列可以作为Visual Basic的变量名是_。 （A）、 a?b （含有？号） （B）、 123ab （数字开头） （C）、 Integer （系统关键字） （D）、 PrintA （E）、 a_b 4、 单选题下列属于正确的字符串常量的是_。 （A）、 $ABC$ （B）、 ABC （C）、 #ABC （D）、 ABC 5、 单选题语句Z=y+1代表_。 （A）、 将变量Z存入变量y中，再加上1的表达式 （B）、 将变量Z存入变量y+1中 （C）、 变量Z取得变量y的值，然后再加上1的一个表达式 （D）、 变量Z取得y+1的值 6、 单选题以下不是菜单编辑器窗口的组成部分的选项是_。 （A）、 编辑区 （B）、 菜单项属性设置区 （C）、 菜单代码编辑区 （D）、 菜单项显示区 7、 单选题若要使命令按钮不可操作，要对_属性设置。 （A）、 Caption （B）、 Enabled （C）、 Visible （D）、 BackColor 8、 单选题下列程序的运行结果是_。 A=5 B=-5 C=Not A=B Print C （A）、 0 （B）、 True （C）、 -5 （D）、 无法输出 9、 单选题对窗体编写如下事件过程： Private Sub Form_MouseDown(Button As Integer, _ Shift As Integer, X As Single, Y As Single) If Button = 2 Then （说明：Button = 2表示按下鼠标右键） Print AAAAA End If End Sub Private Sub Form_MouseUp(Button As Integer, _ Shift As Integer, X As Single, Y As Single) Print BBBBB End Sub 程序运行后，如果单击鼠标右键，则输出结果为_。 （A）、 AAAAA （B）、 AAAAA BBBBB （C）、 BBBBB AAAAA （D）、 BBBBB 10、 单选题在窗体上画一个列表框和一个文本框，然后编写如下两个事件过程： Private Sub Form_Load () List1.AddItem357 List1.AddItem246 List1.AddItem123 List1.AddItem456 Text1.Text= End Sub Private Sub List1_ DblClick ( ) a =List1.Text Print a+Text1.Text End Sub 程序运行后，在文本框中输入“789”，然后双击列表框中的456，则输出结果为_。 （A）、 456789 （说明：因“”号的两边都是字符串，故两数并接） （B）、 0 （C）、 789456 （D）、 1245 11、 单选题要计算1到100之间的偶数之和，请补充下列程序。 Private Sub Command1_Click() x = 0 For I = 1 To 100 Step 2 _ Next I Print 1到100之间的偶数之和为:, x End Sub （A）、 x=x+1 （B）、 x=x+i （C）、 x=x+i+1 （D）、 x=x*2 12、 单选题执行下列程序，运行结果是_。 Private Sub Command1_Click() s=0 Dim I As Integer For I=2.1 To 5.7 Step 0.3 s=s+1 Next Print s End Sub （A）、 13 （B）、 14 （C）、 12 （D）、 死循环 13、 单选题为了使窗体的大小可以改变，必须把窗体的BorderStyle属性设置为_。 （A）、 3 （B）、 2 （C）、 1 （D）、 4 14、 单选题执行下列代码，分别输入12和89，输出结果是_。 Private Sub Form_Click() a = InputBox(D) b = InputBox(E) Print a+b End Sub （A）、 101 （B）、 DE （C）、 1289 （说明：因“”号的两边都是字符串，故两数并接） （D）、 DE1289 15、 单选题在设计阶段，当双击窗体上的某个控件时，所打开的窗口是_。 （A）、 属性窗口 （B）、 工程资源管理器窗口 （C）、 工具箱窗口 （D）、 代码窗口 16、 单选题窗体设计器的主要作用是_。 （A）、 存放代码 （B）、 管理工程资源 （C）、 显示图形、图像以及各种数据 （D）、 存放文本、图片、声音等文件 17、 单选题设a=8,b=10，则以下表达式的值为真的是_。 （A）、 (-3+5a) and (b0) （B）、 (a0) （C）、 a=b and b12 （D）、 (ab) or (b0) 18、 单选题下列代码的运行结果是_。 Private Sub Command1_Click() s = 0 n = 100 For I = 1 To n s = s + I If I Mod 25 = 0 Then Print * Next I End Sub （A）、 5个* （B）、 4个* （C）、 25个* （D）、 100个* 19、 单选题执行下面的语句后，所产生的信息框的标题是_。 a=MsgBox(AAAAA,3,BBBBB) （A）、 BBBBB （B）、 空 （C）、 AAAAA （D）、 出错，不能产生信息框 20、 单选题下列不能打开菜单编辑器的操作是_。 （A）、 按Shift + Alt + M （B）、 按Ctrl+E （C）、 执行“工具”菜单中的“菜单编辑器”命令 （D）、 单击工具栏中的“菜单编辑器”按钮 21、 多选题结构化程序设计的三种基本结构包括_。 （A）、 选择结构 （B）、 顺序结构 （C）、 循环结构 （D）、 嵌套结构 22、 单选题为了暂时关闭计时器，应把该计时器的某个属性设置