02-03学年第1学期VB考试题.doc

20022003学年第一学期计算机应用基础试题命题教师： 陈勇 蔚继承 审题教师： 李书勤 专业及班级： 姓 名： 学 号： 注意事项：交卷时请将试卷对折（姓名朝外）。一、选择题（共20分，每题1分）1. 在下面说法中，不正确的是:A. CPU主要由运算器、控制器和寄存器组成B. 一个完整的计算机系统由硬件系统和软件系统组成C. 保持机房卫生可以有效地防止计算机病毒的发生D. 硬盘尽管在主机内部，但它属于外部存储器2. 在计算机领域中，通常用英文单词“Byte”来表示:A. 字 B. 字长 C. 二进制位 D. 字节3. 目前常用的3.5英寸软盘片角上有一个带滑块的小方口叫写保护口，当滑块挡住写保护口时，其作用是使磁盘:A. 只能读不能写 B. 能读又能写C. 禁止读也禁止写 D. 能写但不能读4. 计算机网络的目标是实现:A. 数据处理 B. 文献检索C. 资源共享和信息传输 D. 信息传输5. 在Word中处理的文件，其默认扩展名是:A. .DOC B. .TXT C. .XLS D. .DAT6. InputBox函数返回值的类型为:A. 数值 B. 字符串 C. 变体 D. 数值或字符串（视输入的数据而定）7. 表达式4+56*7/8 Mod 9 的值是:A. 4 B. 5 C. 6 D. 78. VB中每一个对象都具有的属性是:A. Text B. Name C. AutoSize D. Caption9. 下列可以把当前目录下图形文件pic1.jpg装入图片框Picture1中的语句为:A. Picture1.Handle=pic1.jpg B. Picture=LoadPicture(pic1.jpg)C. Picture=pic1.jpg D. Picture1.picture=LoadPicture(pic1.jpg)10. 下面合法的变量名是:A. X_yz B. 123abc C. integer D. x-y11. 数学关系|x|10表示成VB表达式，以下错误的是:A. Abs(x)10 Or x-10 And x10 D. Sqr(x*x)1012. 赋值语句a=123 & Mid(123456,3,2)执行后，变量a中的值是:A. 1234 B. 123 C. 12334 D. 15713. 不能正确描述逻辑关系“a和b之一为零，但不能同时为零”的是:A. a*b=0 And ab B. (a=0 Or b=0) And abC. a=0 Or b0 And a0 Or b=0 D. Abs(a-b)=a or Abs(a-b)=b14. 在下面求两个数中较大数的程序段中，不正确的是:A. max=IIf(xy,x,y) B. If xy Then max=x Else max=yC. max=x D. If y=x Then max=yIf yx Then max=y max=x15. 对于一个控件数组中的各元素，以下哪一个属性是不能相同的:A. Name B. Index C. Caption D. Left16. Kill语句在VB语言中的功能是:A. 清内存 B. 清病毒 C. 清屏幕 D. 删除磁盘上的文件17. 为了把焦点移到某个指定的控件，所使用的方法是A. SetFocus B. Visible C. Refresh D. GetFocus18. 执行以下代码后：a=8:b=9MsgBox ab则输出结果是:A. -1 B. 0 C. False D. True19. 执行下面的程序段后x=1:y=2:z=3t=x:x=y:y=z:z=t变量t的值是:A. 0 B. 1 C. 2 D. 320. 在磁盘上新建一个顺序文件c:t1.txt，正确的语句是：A. f=c:t1.txt Open f For Input As #2B. f=c:t1.txt Open f For Output As #2C. Open c:t1.txt For Output As #2D. Open c:t1.txt For Random As #2二、填空题（共20分，每题2分）1. 如果字符Q的ASCII码是a，那字符S的ASCII码是 。2. 在Windows及其应用软件中，常用一些快捷键来代替鼠标操作，如复制的快捷键是 、粘贴的快捷键是 。3. 为了使一个Label控件在程序运行时不可见，应对该控件的 属性进行设置；若要使其大小自动根据内容变化，应对其 属性进行设置。4.的VB表达式为: 。5. 表达式123+23 mod 107+asc(A)的值为 。6. 在VB中，运行语句“a%=73.12”后，a%的值为 。7. 要产生100，200之间的随机整数表达式为： 。8. 已知直角坐标系中任意一个点（x, y），表示在第1或第3象限内的条件表达式为： 。9. 取变量s$中，第5个字符起的6个字符应用表达式 。10.将变量x的值按四舍五入保留小数点后两位表达式是 。三、简答题（共20分，每题5分，简要回答要点即可）。1. 在VB中，可用哪些方式对处理结果进行输出？2. 在VB中，为数组元素赋值有哪几种方法？各自有什么特点？3. 在VB中，参数传递有哪两种方法？各自有什么特点？4. 在VB中，从顺序文件中读取数据可以有三种方式，简述各自特点四、根据要求完成以下各题（共20分，每题5分）1.写出执行结果。 Private Sub Command1_Click() Dim i%, s% For i = 2 To 3 s = s + fact(i) Next i Picture1.Print s End Sub Function fact&(ByVal i As Integer) Dim f& f = 1 For i = 1 To i f = f * i Next i fact = f End Function2.以下程序运行后，请写出依次输入8，9后的输出结果。Private Sub Command1_Click() Dim m%, n%, r%, mn% m = InputBox(请输入第一个数) n = InputBox(请输入第二个数) mn = m * n r = m Mod n Do While r 0 m = n : n = r r = m Mod n Loop Print n, mn / nEnd Sub3.请说明以下程序段的作用Private Sub Text1_KeyPress(KeyAscii As Integer) Dim x$ x = Chr(KeyAscii) If InStr(0123456789.-, x) = 0 And KeyAscii 8 Then KeyAscii = 0 End IfEnd Sub4. 写出程序运行结果。Private Sub Command1_Click() Dim i%, f As Boolean For i = 10 To 20 Call ss(i, f) If f = True Then Picture1.Print i; Next iEnd SubSub ss(ByVal p As Integer, f As Boolean) Dim k%, i% k = Int(Sqr(p) f = True For i = 2 To k If p / i = p i Then f = False Exit For End If Next iEnd Sub五、编程，需要