辽宁省计算机二级考试(二级VB)

计算机等级考试二级Visual Basic语言程序设计笔试试卷一、选择题((1)一(20)每小题2分，(21)一(30)每小题3分，共30题，70分)下列各题A)、B)、C)、D)四个选项中，只有一个选项是正确的，请将正确选项涂在答题卡的相应位置上，答在试卷上不得分。

(1)以下不能在“工程资源管理器”窗口中列出的文件类型是A)．bas B)．res C)．fnn D)．ocx(2)以下关于窗体的描述中，错误的是A)执行UnloadFoMl语句后，窗体Fonnl消失，但仍在内存中B)窗体的Ioad事件在加载窗体时发生C)当窗体的Enabled属性为False时，通过鼠标和键盘对窗体的操作都被禁止D)窗体的Height、width属性用于设置窗体的高和宽(3)下列可作为Visual Basic变量名的是A)A#A B)4A C)?xY D)constA(4)设有如下的记录类型Type StudentnumberAs stringname As Stringage As IntegerEnd Type则正确引用该记录类型变量的代码是A) Student．name=”张红” B) Dim As Students．name＝”张红”C) Dim s As Type Student D) Dim s As TypeS．name=”张红” s.Dame＝”张红”(5)函数String(n，“str”)的功能是A)把数值型数据转换为字符串B)返回由n个字符组成的字符串C)从字符串中取出n个字符D)从字符串中第n个字符的位置开始取子字符串(6)将数学表达式Cos2(a+b)+5e2写成Visual Basic的表达式，其正确的形式是A)Cos(a+b)A2十5*exp(2) B)Cos^2(a+b)+5*exp(2)C)Cos(a+b)^2十5*ln(2) D)Cos^2(a+b)+5*ln(2)(7)在窗体上画一个命令按钮，名称为Commandl。

单击命令按钮时，执行如下事件过程：PrlVate Sub Commandl—C1ickoa$="software and hardware"b$＝Right(a$,8)c$=Mid(a$,1，8)Msgbox a$,,b$,c$,1End Sub则在弹出的信息框的标题栏中显示的信息是A)softWare and hardware B)software C)hardwafe D)1(8)执行如下语句：a＝inutBox(”Today”，”TomorroW，”Yesterday”,,,"Day before yesterday"，5) 将显示一个输入对话框，在对话框的输入区中显示的信息是A)Today B)Tomorrow C)Yesterday D)Day before yesterday(9)表示滚动条控件取值范围最大值的属性是A)Max B)LargeChange C)Value D)Max—Min(10)在窗体上画一个名称为Listl的列表框，一个名称为Labell的标签。

列表框中显示若干城市的名称。

当单击列表框中的某个城市名时，在标签中显示选中城市的名称。

下列能正确实现上述功能的程序是A) Private Sub listl_Click()Labell．Caption＝list1.listlndexEnd Sub ．B)Private Sub Listl_C1ick()Labell．Nanle＝Listl．listindexEnd SubC)Private Sub List1_Click()=List1.TextEnd SubD)Private Sub List1_Click()Label1.Caption=List1.TextEnd Sub(11)在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()x=0n=InputBox("")For i= 1 To nFor j = 1 To ix = x +1Next jNext iPrint xEnd Sub程序运行后,单击命令按钮,如果输入3,则在窗体上显示的内容是______。

A)3 B)4 C)5 D)6(12)以下关于菜单的叙述中,错误的是______。

A)在程序运行过程中可以增加或减少菜单项B)如果把一个菜单的Enabled属性设置为False,则可删除该菜单项C)弹出式菜单在菜单编辑器中设计D)利用控件数组可以实现菜单项的增加或减少(13)在窗体上画三个单选按钮,组成一个名为chkOption的控件数组。

用于标识各个控件数组元素的参数是______。

A)TagB)IndexC)ListIndexD)Name(14)在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：Option Base 0Private Sub Command1_Click()Dim city As Variantcity = Array("北京","上海","天津","重庆")Print city(1)End Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是______。

A)空白B)错误提示C)北京D)上海(15)假定有以下函数过程：Function Fun(S As String) As StringDim s1 As StringFor i=1 To Len(S)s1＝UCase(Mid(S，i，1))十s1Next iFun＝s1End Function在窗体上画一个命令按钮，然后编写如下事件过程：Prlvate Sub Commmldl_Click()Dim Str1 As String，Str2 As StringStrl＝inputbox(”请输入一个字符串”)Str2=Fun(Strl)Print Str2End Sub程序运行后，单击命令按钮，如果在输入对话框中输入字符串“abcdefg”，则单击“确定”按钮后在窗体上的输出结果为A)abcdefg B)ABCDEFG C)gfedcba D)GFEDCBA(16)设有语句open "c：Test．Dat" For OutPut As#1则以下错误的叙述是A)该语句打开C盘根目录下一个己存在的文件Test．DatB)该语句在C盘根目录下建立一个名为Test．Dat的文件C)该语句建立的文件的文件号为1D)执行该语句后，就可以通过Print#语句向文件Test．Dat中写入信息(17)以下叙述中错误的是A)用Shell函数可以调用能够在Windows下运行的应用程序B)用Shell函数可以调用可执行文件，也可以调用VisualBasic的内部函数C)调用Shell函数的格式应为：<变量名>＝Shell(……)D)用Shell函数不能执行DoS命令(18)以下关于过程及过程参数的描述中，错误的是A)过程的参数可以是控件名称B)用数组作为过程的参数时，使用的是“传地址”方式C)只有函数过程能够将过程中处理的信息传回到调用的程序中D)窗体可以作为过程的参数(19)在窗体上画一个名称为TxtA的文本框，然后编写如下的事件过程：Private Sub Txta_KeyPress(keyascii as integer)End Sub若焦点位于文本框中，则能够触发KeyPress事件的操作是A)单击鼠标 B)双击文本框C)鼠标滑过文本框 D)按下键盘上的某个键(20)目录列表框的Path属性的作用是A)显示当前驱动器或指定驱动器上的路径B)显示当前驱动器或指定驱动器上的某目录下的文件名c)显示根目录下的文件名D)只显示当前路径下的文件(21)假定有如下事件过程：PriVate Sub Form_MouseDown(button As Integer,Shift As Integer, x As Single，Y AsSingle)If Button＝2 thenPopupMenu popFormEnd ifEnd Sub则以下描述中错误的是A)该过程的功能是弹出一个菜单B)popForm 是在菜单编辑器中定义的弹出式菜单的名称C)参数X、Y指明鼠标的当前位置D)Button=2 表示按下的是鼠标左键(22)以下能够正确计算n!的程序是A) Private Sub Commandl_ClicK()n＝5:x＝1Doi＝i十1Loop While i＜nPrint xEnd SubB) Private Sub Commandl_Click()n＝5: x＝1：i=1DoX＝X*1i＝i十1Loop While i＜nPrint xEnd SubC)Private Sub Commandl_Click()n=5：x＝1：i＝1DoX=X*1i＝i十1Loop while i<=nPrint xEnd SubD)Private Sub Commandl_C1ick()n＝5：x＝1：i=1DoX=X*li=i十1loop While i＞nPrint xEnd Sub(23)在窗体上画一个名称为Commandl的命令按钮，再画两个名称分别为Labell、Label2的标签，然后编写如下程序代码：Private x As IntegerPrivate Sub Commandl—Click()X＝5：Y＝3Call proc(x,Y)Labell．Caption＝XLabel2．Caption＝YEnd SubPrivate Sub proc(ByVal a As Integer，ByVal b As hteger)x＝a* aY=b十b程序运行后，单击命令按钮，则两个标签中显示的内容分别是A)5和3 B)25和3 C)25和6 D)5和6(24)在窗体上画一个名称为Commandl的命令按钮，一个名称为Labell的标签，然后编写如下事件过程：Private Sub Commandl_C1ick()S＝0For i＝1 T0 15x＝2*i一11f x Mod 3＝0 Then s＝s十1NextiLabell．Caption=sEnd Sub．程序运行后，单击命令按钮，则标签中显示的内容是A)1 B)5 C)27 D)45(25)在窗体上画一个名称为Commandl的命令按钮和三个名称分别为Labell、Label2、Label3的标签，然后编写如下代码：Private x As IntegerPrivate Sub Command1_C1ick()Static y As IntegerDimz As Integern＝10z=n十zy＝y十zX＝X十ZLabell.Caption＝xLabel2．Caption=yLabel3．Caption＝zEnd Sub运行程序，连续三次单击命令按钮后，则三个标签中显示的内容分别是A)10 10 10 B)30 30 30 C)30 30 10 D)10 30(26)设在窗体上有一个名称为Commandl的命令按钮，并有以下事件过程：PriVate Sub Commandl_C1ick()Static b As Variantb＝Array(1,3,5,7,9)End Sub此过程的功能是把数组b中的5个数逆序存放(即排列为9，7，5，3，1)。