??
??1、CHANGE 2、VALUE 3、OPTION1（I）.VALUE 4、OPT
??5、LABEL4。CAPTION 6、CHANGE 7、 POPUPMENU 8、X>=0 ??9、X??14、LIST1_DBLCLICK 15、LIST1.TXT
2003年4月全国计算机等级考试二级VB语言笔试试题及答案
一、选择题((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)下列可作为V2sualBasic变量名的是 ?? A)A#A B)4A C)?xY D)constA ?? (4)设有如下的记录类型 ?? Type Student ?? numberAs string ?? name As String
?? age As Integer ?? End Type
?? 则正确引用该记录类型变量的代码是
?? A) Student．name=”张红” B) Dim As Student ?? s．name＝”张红”
?? C) Dim s As Type Student D) Dim s As Type ?? S．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—C1icko ?? a$=\?? b$＝Right(a$,8) ?? c$=Mid(a$,1，8) ?? Msgbox a$,,b$,c$,1
?? End Sub
?? 则在弹出的信息框的标题栏中显示的信息是
?? A)softWare and hardware B)software C)hardwafe D)1 ?? (8)执行如下语句： ?? a＝inutBox(”Today”，”TomorroW，”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() B)Private Sub Listl_C1ick()
?? Labell．Caption＝list1.listlndex Labell．Nanle＝Listl．listindex ?? End Sub ．End Sub
?? 程序运行后，如果单击命令按钮，则在窗体上显示的内容是 ?? A)空白 B)错误提示 C)北京 D)上海
?? (15)假定有以下函数过程： ?? Function Fun(S As String) As String ?? Dim s1 As String
?? For i=1 To Len(S)
?? s1＝UCase(Mid(S，i，1))十s1 ?? Next i ?? Fun＝s1
?? End Function
?? 在窗体上画一个命令按钮，然后编写如下事件过程： ?? Prlvate Sub Commmldl_Click() ?? Dim Str1 As String，Str2 As String
?? Strl＝inputbox(”请输入一个字符串”) ?? Str2=Fun(Strl) ?? Print Str2
?? End Sub
?? 程序运行后，单击命令按钮，如果在输入对话框中输入字符串“abcdefg”，则单击“确 ?? 定”按钮后在窗体上的输出结果为
?? A)abcdefg B)ABCDEFG C)gfedcba D)GFEDCBA ?? (16)设有语句
?? open \：\\Test．Dat\?? 则以下错误的叙述是
?? A)该语句打开C盘根目录下一个己存在的文件Test．Dat ?? B)该语句在C盘根目录下建立一个名为Test．Dat的文件
?? C)该语句建立的文件的文件号为1
?? D)执行该语句后，就可以通过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 As ?? Single)
?? If Button＝2 then ?? PopupMenu popForm ?? End if
?? End Sub
?? 则以下描述中错误的是
?? A)该过程的功能是弹出一个菜单
?? B)popForm 是在菜单编辑器中定义的弹出式菜单的名称 ?? C)参数X、Y指明鼠标的当前位置 ?? D)Button=2 表示按下的是鼠标左键 ?? (22)以下能够正确计算n!的程序是
?? 二级Visual Basic语言程序设计试卷第5页 (共15页) ?? A) Private Sub Commandl_ClicK() ?? n＝5:x＝1 ?? Do ?? X=x*1
?? i＝i十1
?? Loop While i＜n
?? Print x ?? End Sub
?? B) Private Sub Commandl_Click()
?? n＝5: x＝1：i=1 ?? Do ?? X＝X*1 ?? i＝i十1
?? Loop While i＜n ?? Print x ?? End Sub
?? C)Private Sub Commandl_Click() ?? n=5：x＝1：i＝1 ?? Do ?? X=X*1 ?? i＝i十1 ?? Loop while i<=n ?? Print x
?? End Sub
?? D)Private Sub Commandl_C1ick() ?? n＝5：x＝1：i=1 ?? Do ?? X=X*l
?? i=i十1
?? loop While i＞n
?? Print x ?? End Sub
?? (23)在窗体上画一个名称为Commandl的命令按钮，再画两个名称分别为Labell、Label2 ?? 的标签，然后编写如下程序代码：
?? ． 二级vlsudBM5c语言程序设计试卷第6页 (共15页) ?? Private x As Integer
?? Private Sub Commandl—Click() ?? X＝5：Y＝3 ?? Call proc(x,Y) ?? Labell．Caption＝X ?? Label2．Caption＝Y
?? End Sub
?? Private Sub proc(ByVal a As Integer，ByVal b As hteger) ?? x＝a* a ?? Y=b十b ?? End Sub
?? 程序运行后，单击命令按钮，则两个标签中显示的内容分别是 ?? A)5和3 B)25和3 C)25和6 D)5和6
?? (24)在窗体上画一个名称为Commandl的命令按钮，一个名称为Labell的标签，然后 ?? 编写如下事件过程： ?? Private Sub Commandl_C1ick() ?? S＝0
?? For i＝1 T0 15