2003年4月全国计算机等级考试二级visual Basic笔试试卷(1) 免费试题下载-免费试卷下载

2003年4月全国计算机等级考试二级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)下列可作为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$="software and hardware"
　　 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”,,,"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() 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 "c：Test．Dat" For OutPut As#1
　　则以下错误的叙述是