1999年(秋)计算机笔试试卷.doc

1999年（秋）江苏省普通高校非计算机专业学生计算机基础知识和应用能力等级考试笔试卷二级VB第一部分 计算机基础知识A类 以Windows95为平台1.目前人们议论的热点话题“计算机千念虫”问题是指_1_。A. 一种计算机病毒B. Internet上的一种硬件故障C. 指2000年以后，世界上所有的计算机都不能使用D. 指计算机系统能否正确处理涉及2000年以后的日期数据的问题 2. 算术式（1023）10-（337）8+（100）16的值是_2_。A. （1024）10 B. （746）8 C.（1025）10 D. （746）16 3. 按照汉字的“输入处理输出打印”的处理流程，不同阶段使用的汉字编码分别对应为_3_。 A. 国标码-交换码-字型码B.输入码-国标码-机内码C.输入码-机内码-字型码D.拼音码-交换码-字型码4.对于计算机网络来说，局域网的基本拓扑结构有_4_。A. 总线形、主从型和对等型C.总线形、环行和星型 B.总线形、星型和主从型D.总线形、星型和对等型 5. Intel公司生产的Pentium系列CPU与Motorola公司生产的Power PC系列CPU相比，其指令系统是_5_。A. MCA B.ISA C. EISA D. PCI 6. 显示器是计算机重要的输出设备，它用红、绿、蓝三基色的组合来显示彩色，使用_6_位二进制z表示一个象素就可以表现出真彩色。A. 指令条数相等B.相互兼容C.相互不兼容D.寻址方式完全相同7. 结构化查询语言(SQL)通常是_7_的主要功能语言和主要组成部分。A. 管理信息系统 B.通用管理软件系统 C. 数据库管理系统D.高级语言 8. 在Windows95环境下，鼠标的_8_操作通常无任何作用。 A. 左键双击B.右键双击C.左键拖放D.右键拖放9. 在Windows95环境下，用户在创建文件时，输入的文件名为“ X Y ”(字母X与Y前后均有空格)，则系统认为该文件名为_9_。A. XY（所有的空格均被截去） B. X Y（前后的空格被截去） C. X Y(末尾的空格被截去)D. X Y （开头的空格被截去）10. 在删除硬盘上的文件时，如果不打算将被删除的文件放入“回收站”，应在选定文件后_10_。A.直接按键盘上的DELETE键 B. 将选定文件直接拖放到回收站中 C. 按Ctrl键的同时将选定的文件拖放到回收站中D. 按Shift键的同时将选定的文件拖放到回收站中 11. 假设已在桌面上建立了一个C盘上的XYZ文件夹的快捷方式，以下描述正确的是_11_。A. 题目假设不成立，因为在桌面上无法建立文件夹的快捷方式B. 若选定A盘上的部分文件并拖放到此快捷方式上，则A盘上的选定文件被复制到XYZ文件夹中C. 若选定A盘上的部分文件并拖放到此快捷方式上，则A盘上的选定文件被移动到XYZ文件夹中D. 删除该快捷方式，便删除了XYZ文件夹12. 用Windows 95启动盘启动计算机后，屏幕上出现的是_12_。 A. DOS提示符“A：” B. DOS提示符“A：WINDOWS” C. DOS提示符“C：WINDOWS”D. Windows 95桌面 13. 要实现Windows 95中的拨号网络功能，应安装_13_硬件设备。A. 网卡B. 调制解调器C. 路由器D. 交换机14. 在下列Windows 95组件中，执行Windows 95典型安装时不安装的组件是_15_。 A. 写字板B. 画笔C. 剪贴板查看程序D. 造字程序L15. 要清除磁盘中存在的分散且不连续的存储空间，以提高磁盘的读写速度，应使用Windows 95的系统工具_14_。A. 磁盘扫描程序 B. 磁盘压缩空间程序 C. 磁盘备份工具D.磁盘碎片整理程序 16. 在中文Windows95环境下，系统默认的英文及各种汉字输入法之间的快捷键是_16_。 A. Ctrl+空格B.Ctrl +Shift C. Shift+Alt D. Ctrl+Alt 17. 在WORD 7.0的文档中，输入不可分隔的空格（即该空格不可作为行的分隔，空格前后的两个单词在同以行中出现）应按_17_组合键。A. Ctrl +Shift+空格 B. Ctrl+空格 C. Shift+空格D. 空格18. 用户在用Word 7.0中编辑某文档时，可以利用“窗口”菜单中的“新建窗口”命令。该菜单命令的功能是_18_。 A. 新建一个空白文档窗口，等价于单击“常用”工具栏上的“新建”按纽B. 新建一个文档窗口，并将被编辑中的文档中的选定内容复制到新的文档中C. 新建一个文档窗口，并将被编辑中的文档中内容复制到新的文档中D. 新建一个文档窗口，该窗口与原文档窗口均处理同一文档19. 在用Word 7.0中编辑文档时，通过“段落”的格式设置无法实现的功能是_19_。 A. 孤行控制，即防止在页面顶端打印段落末行或在页面底端打印段落末行B.与下段同页，即防止在所选段落与后一段之间出现页符C. 段后分页，即在所选段落之后插入人工分页符D. 段中不分页，即防止在段落之中出现分页符20. 在Word 文档中，文档模板文件的扩展名是_20_。A. .DOSB. .DOTC. .RTFD. .LNK第二部分 Visual Basic 程序设计一、选择题（用答题卡答题，答案依次填在21-30答题号内）21. Visual Basic 是一种面向_21_的程序设计语言。A.过程 B.用户 C.方法 D.对象22. 一只白色的足球被踢进球门，则白色、足球、踢、进球门是_22_。A.属性、对象、方法、事件 B.属性、对象、事件、方法 C.对象、属性、方法、事件D.对象、属性、事件、方法23. 如果在窗体上有命令按纽OK，在代码编辑窗口有与之对应的CmdOK_Click()事件，则命令按纽控件的名称属性和Captin属性分别为_23_。A.OK、CmdB. Cmd、OKC. CmdOK、OKD. OK、CmdOK24. 窗体Form1的名称属性是frm,它的Load事件过程名是_24_。A. Form_Load B. Form1_Load C. frm_Load D. Me_Load25. 在语句Public Sub Sort(i As Integer)中的 i 是一个按_25_传递的参数。A. 地址B. 值C. 变量D. 常量26. x+y小于10且x-y大于0的逻辑表达式是_26_。A. x+y0 B. (x+y0 C. x+y0D. x+y0 27. 在Form_Click事件中执行如下语句的正确结果是_27_。Print Format(1236.54,+ #,#0.0%)A. 123456B. +123,654.0%C. +123,6.54%D. +123,65428. 代数表达式 ，对应Visual Basic 表达式是_28_。A. E(x+y)+|x+y|1/2/2+1B. Exp(x+y)+Sqr(Abs(x+y)/2*3.14159+1C. (Exp(x+y)+Sqr(Abs(x+y)/(2*3.14159+1)D.( Exp(x+y)+Sqr(Abs(x+y)/2*+129. 要对顺序文件进行写操作，下列打开文件语句中正确的是_29_。A. Open file1.txt For Output As #1 B. Open file1.txt For Input As #1 C. Open file1.txt For Random As #1 D. Open file1.txt For Binary As #1 30. 有变量定义语句Dim a,b As Integer， 变量 a 的类型和初值是_30_。A. Integer,0B. Variant,空值C. String,D. Long,0.0二、填空题（请把答案填写在答题纸的相应答题号内，每个答题只占一行）1. 运行下面的程序，单击窗体后在窗体上显示的第一行结果是_（1）_；第二行结果是_（2）_；第三行结果是_（3）_。Private Sub Form_click()Dim i As Integer, s as IntegerFor i=1 To 10s=s+iIf s10 ThenPrint ss=0End IfNext iEnd Sub2. 运行下面的程序，单击窗体后在窗体上显示的内容是_（4）_；若将程序中的A语句与B语句的位置互换，再次执行程序，单击窗体后在窗体上显示的内容是_（5）_。Private Sub Form_Click()Dim a As Integer,b As Integer a=0: b=0 Do While a0Digit=n Mod 10n=n10k=k-1LoopEnd FunctionPrivate Sub Form_Click()Print Digit(1234,2)Print Digit(1234,3)End Sub4.运行下面的程序，单击窗体后在窗体上显示的第一行结果是_（8）_；第三行结果是_（9）_.Private Sub Form_Click()Dim mst As String,mst1 As String,mst2 As StringDim i As Integermst1=CeBbAaFor i=Len(mst1) to 1 Step -2mst2=Mid(mst1,i-1,2)mst=mst & mst2Print mstNext iEnd Sub5. 运行下面的程序，单击窗体后在窗体上显示的第一行结果是_（10）_；第三行结果是_（11）_.Private Sub Test(x As Integer)Dim i As IntegerIf x0 ThenCall Test(x-1)For i=1 To xPrint x;Next iPrintEnd If End SubPrivate Sub Form_Click()Test 3End Sub6. 运行下面的程序，单击窗体后在窗体上显示的第二行结果是_（12）_；第四行结果是_（13）_.Dim y As IntegerPrivate Sub Form_Click()Dim x As Integerx=1:y=1Print x1=;x, y1=;yTestPrint x4=;x, y4=;yEnd SubPrivate Sub Test()Dim x As IntegerPrint x2=;x, y2=;yx=2:y=3Print x3=;x, y3=;yEnd Sub7. 图1是应用程序的窗体，要求用户选中复选框 ChkBold 后，文本框 TxtDisplay 中的文字以粗体显示，选中复选框 ChkItalic 后,文本框 TxtDisplay 中的文字以斜体显示，单击关闭按纽 CmdClose结束应用持续运行。Private Sub ChkBold_Click()If_（14）_ThenTxtDisplay.FontBold=TrueElseTxtDisplay.FontBold=_（15）_End If End SubPrivate Sub ChkItalic_Click()If_（16）_ThenTxtDisplay.FontItalic=FalseElseTxtDisplay.FontItalic=True End If End SubPrivate Sub CmdClose_Click()_（17）_MeEnd Sub8. 验证下列命题：设n是一个s1是n的各位数字之和，s2是2n的各位数字之和。若s1=s2,则n是9的倍数。根据图2和程序填写对象的相关属性，X代表该对象无属性。对象 名称（Name） 标题（Caption） 正文（Text） 窗体 Frm1 (18) X 标签 LblInput (19) X 文本框 TxtInput X 空 判断按纽 (20) 验证 X 退出按纽 CmdExit 退出 X Private Sub CmdVerify_Click()Dim n As Integer,s1 As Integer,sa As Integern=Val(_（21_)s1=Sm(n)s2=Sm(2*n)If _（22）_ThenMsgBox 该命题成立ElseMsgBox 该命题不成立End If TxtInput.Text=TxtInput.SetFocusEnd SubPrivate Sub CmdExit_Click()Unload MeEnd SubPrivate Function Sm(_（23）_) As IntegerDim sm1 as integersm1=0Do While n0sm1=sm1+n Mod 10_（24）_LoopSm=sm1End Function9. 本程序从键盘读入n个整数 X1,X2,Xn,若这些整数满足如下条件之一：(1) X1X2Xn;(2) X1X2Xj+1Xj+2Xn,其中 1jX2Xn.则输出“符合条件！”，否则，输出“不符合条件！”。Private Sub Form_Click()Dim a() As IntegerDim i As Integer, j As Integer, n As Integern=InputBox(输入数据个数)_（25）_For i=1 To na(i) = InputBox(输入数据)Next iFor i=1 To n-1If a(i) a(i+1)Then Exit ForNext iFor j=i To n-1If _（26）_Then Exit ForNext jIf _（27）_ThenPrint 符合条件！ElsePrint 不符合条