2001秋浙江省高校计算机等级考试试卷(二级VisualBASIC).doc
- 文档编号:18676234
- 上传时间:2023-08-30
- 格式:DOC
- 页数:11
- 大小:85KB
2001秋浙江省高校计算机等级考试试卷(二级VisualBASIC).doc
《2001秋浙江省高校计算机等级考试试卷(二级VisualBASIC).doc》由会员分享,可在线阅读,更多相关《2001秋浙江省高校计算机等级考试试卷(二级VisualBASIC).doc(11页珍藏版)》请在冰点文库上搜索。
2001年秋浙江省高校计算机等级考试试卷(二级VisualBASIC)
说明:
(1)考生应将试题一至试题三的答案涂在答题卡上,将第四、五题的答案填写在答卷上,否则作无效处理;
(2)请将你的准考证号的后四位填写在答卷的右下角指定位置内;
(3)考试时间为120分钟。
试题一、计算机基础题(本题共15分)
(一)单选题(每小题1分,共10分)
(1)下面
(1)组设备包括输入设备、输出设备和存储设备。
A、CRT、CPU、ROM B、鼠标器、绘图仪、光盘
C、磁盘、鼠标器、键盘 D、磁带、打印机、激光打印机
(2)微型计算机的更新与发展,主要基于
(2)的变革。
A、软件 B、微处理器 C、存储器 D、磁盘的容量
(3)内存空间地址段为2001H——7000H,则其存储空间为(3)KB。
A、20480 B、20.48 C、20 D、5
(4)(4)是Windows操作的特点。
A、先选择操作命令,再选择操作对象
B、先选择操作对象,再选择操作命令
C、需同时选择操作对象和操作命令
D、需将操作对象拖到操作命令上
(5)在Windows的资源管理器中,刚查看了A盘的目录,若在同一驱动器中换了一张软盘,想查看新的目录,可用(5)命令。
A、刷新 B、更改 C、显示 D、重显示
(6)在使用Word文本编辑软件时,要把文章中所有出现的“学生”两字都改成以粗体显示,可以选择(6)功能。
A、样式 B、改写 C、替换 D、粘贴
(7)在Word编辑文本时,为了使文字绕着插入的图片排列,可以进行的操作是(7)。
A、插入图片,设置环绕方式
B、插入图片,调整图形比例
C、建立文本框,插入图片,设置文本框位置
D、插入图片,设置叠放次序
(8)在GB2312-80汉字系统中,计算机把一个汉字表示为(8)。
A、汉语拼音字母的ASCII代码 B、十进制数的二进制编码
C、按字形笔划设计的二进制码 D、两个字节的二进制编码
(9)使用电子邮件时,有时收到的邮件有古怪字符,即出现了乱码,这是由于(9)。
A、病毒 B、接收方操作系统有问题
C、发送方计算机故障 D、编码未统一
(10)根据病毒的传染途径可将病毒分为操作系统病毒、文件型病毒、网络型病毒三种,其中文件型病毒往往附在.COM和.(10)文件中,当运行这些文件时,会激活病毒并常驻内存。
A、EXE B、FRM C、CPP D、DBC
(二)双选题(每小题1分,共5分)
注:
从供选择的答案中选两个正确答案
(11)设A盘处于写保护状态,以下可以进行的操作是(11)。
A、将A盘中某个文件改名 B、将A盘中所有内容复制到C盘
C、在A盘上建立文件AA.C D、显示A盘目录树
(12)下列软件中,(12)属于系统软件。
A、CAD B、Word C、汇编程序 D、C语言编译程序
(13)在Windows中利用“任务栏属性”对话框,可以进行(13)操作。
A、在“开始”菜单中添加一个项目
B、在桌面上建立一个快捷方式
C、在任务栏上显示输入法指示器
D、在任务栏上显示时间
(14)在Windows附件中,下面叙述正确的是(14)。
A、记事本中可以含有图形
B、画图是绘图软件,不能输入汉字
C、写字板中可以插入图形
D、计算器可以将十进制整数转换为二进制或十六进制数
(15)在Word中,当选中了文本后,使用(15)命令可以使剪贴板内容与选中的内容一致。
A、粘贴 B、剪切 C、复制 D、删除
试题二、语言基础题(本题共25分)
(一)判断题(每小题1分,共10分,选A表示正确,选B表示错误)
(16)Variant是一种特殊的数据类型,Variant类型变量可以存储除了定长字符串数据及自定义类型外的所有系统定义类型的数据。
Variant类型变量还可具有Empty、Error和Null等特殊值。
(17)窗体的Enabled属性值为False时,该窗体上的按钮、文本框等控件就不会对用户的操作做出反应。
(18)框架控件和形状控件都不能响应用户的鼠标的单击事件。
(19)在一个窗体的代码中不能使用Unload语句来卸载本窗体,即一个窗体只能由其它窗体卸载。
(20)对于文件系统控件,当驱动器控件Drive1中的驱动器符改变时,文件夹列表控件Dir1中显示的文件夹也作相应改变,可以在Drive1中的Change事件中使用如下命令:
Dir1.Path=Drive1.Drive
(21)当在一个简单组合框的文本框中输入一个它的列表框中没有的条目时,组合框会自动把这一条目添加到它的列表框中。
(22)图片框的Move方法不仅可以移动图片框,而且还可以改变该图片框的大小,同时也会改变该图片框有关属性的值。
(23)当定时器控件的Interval属性值设置为0时,会连续不断地激发Timer事件。
(24)VisualBASIC提供的几种标准坐标系统的原点都是在绘图区域的左上角,如果要把坐标原点放在其它位置,则需使用自定义坐标系统。
(25)如果一个菜单项的Visible属性为False,则它的子菜单也不会显示。
(二)单选题(每小题1分,共15分)
(26)一个对象可以执行的动作和可被对象识别的动作分别称为(26)。
A、事件、方法B、方法、事件C、属性、方法D、过程、事件
(27)在窗体Form1的Click事件过程中有以下语句:
Label1.Caption="VisualBasic"
若本语句执行之前,标签控件的Caption属性为默认值,则标签控件的Name属性和Caption属性在执行本语句之前的值分别为(27)。
A、"Label"、"Label"B、"Label1"、"VisualBasic"
C、"Label1"、"Label1"D、"Caption"、"Label"
(28)(28)对象不具有Caption属性。
A、LabelB、OptionC、FormD、Timer
(29)Integer类型的变量可存的最大整数是(29)。
A、255B、256C、32768D、32767
(30)下列数据类型中,占用内存最小的是(30)。
A、BooleanB、ByteC、IntegerD、Single
(31)(31)对象不能作为控件的容器。
A、FormB、PictureBoxC、ShapeD、Frame
(32)代数式的VisualBASIC表达式是(32)。
A、a+b/Sqr(c+Log(a))+c/dB、(a+b)/(Abs(c+Log(a))+c/d)
C、(a+b)/(Abs(c+Log(a))+c/d)D、(a+b)/(Sqr(c+Log(a))+c/d)
(33)已知A、B、C中C最小,则判断A、B、C可否构成三角形三条边长的逻辑表达式是(33)。
A、A>=BAndB>=CAndC>0B、A+C>BAndB+C>AAndC>0
C、(A+B>=COrA-C<=C)AndC>0D、A+B>CAndA-B>CAndC>0
(34)下面(34)是日期型常量。
A、"12/19/99"B、12/19/99C、#12/19/99#D、{12/19/99}
(35)如果在图片框上使用绘图方法绘制一个圆,则图片框的(35)属性不会对该圆的外观产生影响。
A、BackColorB、ForeColorC、DrawWidthD、DrawStyle
(36)一个菜单项是不是一个分隔条,由(36)属性决定。
A、Name(名称)B、CaptionC、EnabledD、Visible
(37)下面(37)对象在运行时一定不可见。
A、LineB、TimerC、TextD、Option
(38)形状控件所显示的图形不可能是(38)。
A、圆B、椭圆C、圆角正方形D、等边三角形
(39)以下(39)方式打开的文件只能读不能写。
A、InputB、OutputC、RandomD、Append
(40)由Fork=35TO0Step3:
Nextk循环语句控制的循环次数是(40)。
A、0B、12C、-11D、-10
试题三、程序填空题(每空2分,共20分)
仔细阅读下列各小题的程序说明和相应的程序,在每小题提供的若干可选答案中,挑选一个正确答案。
1.【程序说明】
本程序求3-100之间的所有素数(质数)并统计个数;同时将这些素数从小到大依次写入顺序文件e:
\dataout.txt;素数的个数显示在窗体Form1上。
【程序】
PrivateSubCommand1_Click()
DimcountAsInteger,flagAsBoolean
Dimt1AsInteger,t2AsInteger
(41)
count=0
Fort1=3To100
flag=True
Fort2=2ToInt(Sqr(t1))
If(42)Thenflag=False
Nextt2
(43)
count=count+1
Write#1,t1
EndIf
Nextt1
(44)
Close#1
EndSub
(41)A、Opene:
\dataout.txtForOutputAs#1
B、Open"e:
\dataout.txt"ForIntputAs#1
C、Open"e:
\dataout.txt"ForOutputAs#2
D、Open"e:
\dataout.txt"ForOutputAs#1
(42)A、t2\t1=0B、t1Modt2=0
C、t1\t2=0D、t2Modt1=0
(43)A、IfflagThenB、Ift2>t1Then
C、Ift1>t2ThenD、Ift2>Int(Sqr(t1))Then
(44)A、Form1.Print"素数个数:
"count
B、Print#1"素数个数:
";count
C、Form1.Print"素数个数:
";count
D、Form1.Print"素数个数:
":
count
2.【程序说明】
由输入对话框输入n(设n为大于零且小于30的自然数),计算下列表达式的值,并在标签框Label1上显示。
【程序】
PrivateSubForm_Click()
DimnAsInteger,sumAsDouble,kAsInteger
n=Val(InputBox("n=","请输入自然数n(n>0且n<30)"))
Do(45)
n=Val(InputBox("n=","请重输"))
Loop
sum=0
(46)
Do
k=k+1
sum=(47)
LoopUntilk>=n
Label1.Caption="sum="+Str(sum)
EndSub
(45)A、Whilen<=0Orn>=30
B、Whilen<=0Andn>=30
C、Untiln>0Orn<30
D、Untiln>=0Andn<=30
(46)A、k=2B、k=1C、k=-1D、k=0
(47)A、1/(k*(k+1))B、1/(k-1)*k
C、sum+1/(k*(k+1))D、sum+1/k*(k+1)
3.【程序说明】
本程序用于处理文本框Text1.Text中的内容,假设文本框中有偶数个字符。
要求将文本框中的内容从头尾至中间依次各取字符,组成一个新的字符串Str2,并在窗体上输出。
例如:
Text1.Text="12345678",则Str2="18273645"
【程序】
PrivateSubForm_Click()
DimStr1AsString,Str2AsString
Str1=Text1.Text
Str2=""
m=0
Do(48)
Str2=Str2+(49)
Str2=Str2+(50)
m=m+1
Loop
Form1.PrintStr2
EndSub
(48)A、Whilem C、Untilm>Len(Str1)/2D、Untilm (49)A、Mid(Str1,m,1)B、Mid(Str1,Len(Str1)-m,1) C、Mid(m,Str1,1)D、Mid(Str1,m+1,1) (50)A、Mid(Str1,Len(Str1)–m+1,1) B、Mid(Str1,m,1) C、Mid(Str1,Len(Str1)-m,1) D、Mid(Str1,Len(Str1)–m+1,m) 试题四、程序阅读题(每小题5分,共20分) 阅读下列程序,写出运行结果。 1.(5分) PrivateSubCommand1_Click() n=0: x=1: y=0 DoWhilex<20 n=n+1 y=x+y x=x*(x+1) Loop Text1.Text="n="&Str(n) Text2.Text="x="&Str(x) Text3.Text="y="&Str(y) EndSub 程序运行时单击Command1后,分别写出文本框Text1、Text2和Text3的Text值。 2.(5分) Functionchg(aAsInteger,bAsInteger)AsInteger DimnAsInteger Forn=0To2 a=a+b Nextn chg=a EndFunction PrivateSubForm_Click() DimaAsInteger,bAsInteger,zAsInteger a=1: b=1 Forn=1To3 z=chg(a,b) Form1.Print"n=";n,"z=";z Nextn EndSub 写出程序运行时单击窗体后,Form1上的输出结果。 3.(5分) PrivateSubForm_Click() Dimx(5)AsInteger x (1)=8: x (2)=3: x(3)=1: x(4)=6: x(5)=4 Fori=1To4 Forj=i+1To5 Ifx(i) x(i)=x(j): x(j)=t Nextj,i Fork=1To5 Form1.Print"x(";k;")=";x(k) Nextk EndSub 写出程序运行时单击窗体后,Form1上的输出结果。 4.(5分) PrivateSubForm_Click() Dima(2,3)AsInteger Fori=1To2 Forj=1To3 a(i,j)=2*i-j Nextj,i Forh=1To3 Fork=1To2 Form1.Printa(k,h), Nextk Print Nexth EndSub 写出程序运行时单击窗体后,Form1上的输出结果。 试题五、程序设计题(每题10分,共20分) 1.用输入对话框输入x,根据下式计算对应的y,并在窗体上输出y的值。 注: 程序写在命令按钮Command1的Click事件中。 2.用户界面如图1所示,用于实现左右两个组合框中数据的左移和右移功能。 程序开始运行时,在左边组合框中生成10个由小到大排列的随机三位正整数(假设在设计阶段该组合框的Sorted属性值已设置为True),现要求完成: (1)单击“>>”钮,左边组合框中的10个数全部移到右边组合框,并由大到小排列,同时使“<<”钮能响应,“>>”钮不能响应; (2)单击“<<”钮,右边组合框中的10个数全部移到左边组合框,并由小到大排列,同时使“>>”钮能响应,“<<”钮不能响应; (3)单击“结束”按钮,结束程序运行。 图1 部分程序代码如下: PrivateSubForm_Load() DimiAsInteger Label1.Caption="组合框1" Label2.Caption="组合框2" CmdRight.Caption=">>" CmdRight.Enabled=True CmdLeft.Caption="<<" CmdLeft.Enabled=False CmdExit.Caption="结束" ComboLeft.Text="" Fori=1To10 ComboLeft.AddItemInt(Rnd*900)+100 Nexti ComboRight.Text="" EndSub 请分别编写三个命令按钮的单击事件。 2001年秋浙江省高校计算机等级考试参考答案 (二级VisualBASIC) 试题一、计算机基础题(本题共15分) (一)单选题(每小题1分,共10分) 题号 A B C D 题号 A B C D 题号 A B C D (1) - (5) - (9) - (2) - (6) - (10) - (3) - (7) - (4) - (8) - (二)双选题(每小题1分,共5分) 题 A B C D 题 A B C D (11) - - (14) - - (12) - - (15) - - (13) - - 试题二、语言基础题(本题共25分) (一)判断题(每小题1分,共10分,答案用A表示正确,B表示错误) (16)A(17)A(18)B(19)B(20)A (21)B(22)A(23)B(24)A(25)A (二)单选题(每小题1分,共15分) (26)B(27)C(28)D(29)D(30)B (31)C(32)D(33)B(34)C(35)A (36)B(37)B(38)D(39)A(40)A 试题三、程序填空题(每空2分,共20分) (41)D(42)B(43)A(44)C(45)A (46)D(47)C(48)A(49)D(50)C 试题四、程序阅读题(每小题5分,共20分) 256 1.(5分)
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 2001 浙江省 高校 计算机等级考试 试卷 二级 VisualBASIC