If Sgn(n) > 0 Then
s2 = ________________________ ElseIf Sgn(n) < 0 Then
s1 = String(Abs(n), \ End If
For i = Len(s1) To 1 Step -1 n1 = Val(Mid(s1, i, 1)) n2 = Val(Mid(s2, i, 1)) s3 =__________________ Next i
If c <> 0 Then s3 = ___________ Text3 = s3 End Sub
Private Function add(x As Integer, y As Integer, c As Integer) As String add = CStr((x + y + c) Mod 10) ______________________ End Function
9．下面程序的功能是：找出各位数字互不相同，且其6倍数仍由不组成该数的数字构成的六位整数。例如：126873的6倍数是761238，就是符合条件的数。
提示：程序中用a、b数组来标示数组元素下标值对应的数字是否出现在六位整数中。例如2出现在某六位整数中，则a(2)的值为1。 Option Explicit
Private Sub Command1_Click()
Dim i As Long, i2 As Long, flag As Boolean Dim a(0 To 9) As Integer, b(0 To 9) As Integer For i = 100000 To 160000 Call validate(i, a, flag) If flag Then i2 = i * 6
Call validate(i2, b, flag)
If flag And compare(a, b) Then
List1.AddItem i & \ \ End If End If Next i End Sub
'验证一个数是否由不同数字组成
Private Sub validate(n As Long, a() As Integer, f As Boolean) Dim p As Integer, i As Integer Erase a f = False
For i = 1 To Len(CStr(n)) p = _______________ If a(p) = 1 Then Exit Sub Else
______________ End If Next i
__________________ End Sub
'判断两个数是否由相同数字组成
Private Function compare(a() As Integer, b() As Integer) As Boolean Dim j As Integer compare = False
For j = 1 To UBound(a) If a(j) <> b(j) Then
______________________ End If Next j
compare = True End Function
2010年秋
第一部分 计算机基础知识
1.微电子技术是信息技术领域中的关键技术,它以集成电路为核心.下列有关集成电路的叙述中,错误的是 ___(1)___
A. 现代集成电路使用的半导体材料只能是硅(Si),不能使用其它任何半导体材料 B. 集成度是指集成电路包含的电子元件数目,可分为SSI、MSI、VLSI等 C. Moore定律指出,单块集成电路的集成度平均18--24个月翻一番
D. 我国第二代身份证中嵌入了集成电路芯片,可以实现电子防伪和数字管理功能
2. 数据传输速率是数据通信中重要的性能指标。Gb/s是数据传输速率的计量单位之一,其正确含义是 ___(2)___ 。
A.每秒兆位 B.每秒千兆位 C.每秒百兆位 D.每秒百万位
3.所谓\变号操作\是指将一个整数变成绝对值相同但符号相反的另一个整数。假设使用补码表示的8位整数x=10010101,则经过变号操作后结果为___(3)___.
A.01101010 B.00010101 C.11101010 D.01101011 4.下列有关PC机主板的叙述中,错误的是 ___(4)___ 。 A. 主板的物理尺寸没有标准,各厂家均可自行定义
B. 主板上包含芯片组,它是PC机各组成部分相互连接和通信的枢纽 C. 主板上包含BIOS和CMOS芯片
D. 主板上包含CPU插座、内存条插槽及其它类型的插槽
5. 下列有关PC机中央处理器(CPU)和内存(内存条)的叙述中,正确的是 __(5)____ .
A.PC机所采用的CPU都是Intel公司生产的Pentium系列芯片,其它厂商生产的CPU都与之不兼容 B.目前已有双核的微处理器(例如Core 2 Duo),但还没有四核的微处理器 C. 通常来说,DRAM的速度比SRAM的存取速度慢
D. 一般来说,一个内存条上仅有一个DRAM或SRAM芯片
6. 下列有关PC机I/O总线与I/O接口的叙述中,错误的是 __(6)____ . A. 目前PC机中协调与管理总线操作的总线控制器包含在主板上的芯片组中 B. 总线最重要的性能是数据传输速率,其单位通常为MB/s或GB/s
C. SATA接口的数据传输速率通常低于USB 2.0的数据传输速率 D. USB连接器有4个引脚,其中一个引脚连接+5V电源
7. 下列有关PC机常用I/O设备的叙述中,错误的是__(7)____。
A. 目前台式机键盘通常有一百零几个按键,笔记本电脑的键盘有八十几个按键 B. 目前流行的鼠标是光电鼠标,其与主机的接口有PS/2与USB两种 C. 宽屏LCD显示器的宽高比为16：9或16：10
D. 打印速度是打印机的重要性能指标,速度单位通常为dpi
8. 下列有关PC机外存储器的叙述中,错误的是___(8)___ 。
A. 目前硬盘的盘片大多为3.5、2.5或1.8英寸,一个硬盘中可有一个或多个盘片 B. 目前有些u盘可以模拟硬盘和光盘存储器启动操作系统
C. 目前光盘存储器主要分为CD、DVD和BD三种,它们均采用红外激光进行读写 D. 目前光驱的速率通常用多少倍速表示
9. 下列有关计算机软件的叙述中,错误的是___(9)___. A. 软件一般是指程序及其相关的数据和文档资料
B. 从软件的用途考虑,软件可以分为系统软件和应用软件,主要的系统软件有操作系统、语言处理系统和数据库管理系统等。
C. 从软件的权益来考虑,软件可以分为商品软件、共享软件和自由软件,共享软件和自由软件均为无版权的免费软件
D.Linux是一种系统软件、自由软件
10.到目前以止,Windows系列操作系统已推出多个版本。在下列版本中,最新的Windows版本是___(10)___ A. Windows7 B. Windows Me C. Windows XP D. Windows Vista 11.下列有关Windows XP操作系统功能的叙述中,错误的是___(11)___. A. 系统通过\时间片”轮转策略支持多任务处理 B. 系统利用SPOOLing技术进行存储管理
C. 在设备管理中引入了缓冲技术,以减少I/O操作的等待时间 D. 系统支持PnP功能,并按ACPI标准进行电源管理
12.在因特网中某台主机的IP地址为20.25.30.8,子网掩码为255.255.255.0,那么该主机的主机号为 ___(12)___ 。
A. 20 B. 25 C. 30 D. 8
13.局域网中需要传输的数据必须预先组织成若干数据帧,每一数据帧的格式如下图所示：上图中最末部分\”表示的是___(13)___ 。
? 发送计算机地址 目的计算机地址 编号 有效载荷
A.协议信息 B.校验信息 C.冗余信息 D.结束标志
14.目前网络用户接入因特网有多种方式,例如ADSL、HFC等。通过HFC接入因特网时采用的网络是___(14)____。
A. 有线电话网 B. 有线电视网 C. 无线局域网 D. 移动电话网 15.下列网络协议中,直接与电子邮件传输相关的网络协议是___(15)___。 A.FTP B.SMTP C.TELNET D.NNTP
16.下列有关计算机中文本与文本处理的叙述中,错误的是 ___(16)____ A. 西文字符主要是采用ASCII字符集,基本ASCII字符集共有256个字符
B. 我国最早采用的汉字字符集是GB2312,包含6000多个汉字和若干个非汉字字符 C. 无论采用何种方式输入汉字,在计算机中保存时均采用统一的汉字内码
D. 简单文本和丰富格式文本中字符信息的表示相同,区别在于格式信息的表示 17.彩色图像所使用的颜色描述方法称为颜色模型(即颜色空间)。下列四种颜色模型中,彩色喷墨打印机使用的是___(17)___.
A. RGB B. HSB C. YUV D. CMYK
18.文件的扩展名用于标记文件的类型,用户应该尽可能多地知晓各类文件的扩展名,下列文件中,属于数字声音的文件是______ A. ABC.RM B. ABC.WMA C. ABC.MKV D. ABC.SWF
19.信息系统软件开发瀑布模型包括系统规划、系统分析、系统设计、系统实施和系统维护等几个阶段。下面各项工作中,属于系统实施阶段的是___(19)___ A.问题定义 B.可行性研究 C.系统测试 D.绘制E-R图
20.下列有关Micmsoft Word 2003和Microsoft Excel 2003软件的叙述中,错误的是___(20)___ A. 利用Word软件编辑文档,可以将其保存为TXT、DOC、RTF和HTM格式文件 B. 利用Word软件编辑文档时,可以统计选定文本的字符数
C. 在Excel软件中,可以打开(导入)TXT、DBF、HTML格式的文件(数据) D. Excel文件可以设置打开权限密码,但不可以单独设置修改权限密码
第二部分Visual Basic程序设计
一、选择题(用答题卡答题,答案依次填在21--30答题号内) 21.以下有关事件过程的说法中,正确的是___(21)___ A.所有的事件过程都是Sub子过程 B.所有的事件过程都没有参数
C.所有的事件都是由用户的操作直接引发的 D.事件过程不能使用Call语句调用执行 22.以下语句中,正确的是___(22)___ 。 A.List1.AddItem x,\ B.Picture1.Print x,\C.Text1.Text=x,\ D.Label1.Caption=x,\23.以下有关VB程序书写规则的说法中,错误的是___(23)_____ A.一行可以书写多条语句,语句间用\分隔
B.使用注释时,\可与注释语句定义符\互换使用 C.过长的语句,可使用续行标志\分写在多行上
D.代码输入时,可不用区分字母大小写,系统会将\保留字\首字母自动改为大写
24.设变量I和J是整型变量,K是长整型变量。I已赋值32763,J和K分别赋值5,若接着执行以下语句,可正确执行的是___(24)___。 A.I=I+K B.J=I+K C.K=I+J+K D.K=K+I+J 25.以下关系表达式中,运算结果为False的是 ___(25)___ A.CInt(3.5)-Fix(3.5)>=0 B.CInt(3.5)-Int(3.5)>=0 C.int(3.5)+int(-3.5)>=0 D.int(3.5)+fix(-3.5)>=0 26.以下字符运算表达式中,其功能与函数Mid(s,i,i)相同的是___(26)___ A.Left(s,i) & Right(s,Len(s)-i) B.Left(Right(s,Len(s)-i+1),i) C.left(right(s,i),len(s)-i+1) D.left(s,len(s)-i) & right(s,i)
ex?sin3x27.数学表达式xy?的VB算术表达式为____(27)____
x?y3A.Sqr(x*y^3)+Abs(Exp(x)+Sin(x)^3/(x-y)) B.Sqr(x*y^3)+Abs((Exp(x)+Sin(x)^3)/(x-y)) C.Sqr(x*y^3)+Abs(Exp(x)+Sin(x)^3/x-y)
D.Sqr((x*y)^3)+Abs((Exp(x)+Sin(x)^3)/(x-y))
28.以下有关数组的说法中,错误的是___(28)___。 A.使用ReDim语句,可以改变任何数组的大小与维数 B.使用ReDim语句,可以定义一个新数组
C.使用ReDim语句重新定义动态数组时,维界表达式中可以采用变量 D.使用ReDim语句重新定义的新数组,既可比原数组大,也可比原数组小 29.以下有关Function过程的说法中,正确的是___(29)___。 A.函数名在过程中只能被赋值一次
B.如果在函数体内没有给函数名赋值,则该函数无返回值
C.如果在定义函数时没有说明函数的类型,则该函数是无类型的
D.执行函数过程中的Exit Function语句,将退出该函数,返回到调用点 30.以下有关文件用法的描述中,正确的是___(30)___ A.只有顺序文件在读写前需要使用Open语句打开 B.使用同一个文件号,可同时打开多个不同的文件
C.如果以Input方式试图打开一个不存在的顺序文件,则会出错
D.如果程序中缺少Close语句,即使程序运行结束,打开的文件也不会自动关闭 二、填空题(请将答案填写在答题纸的相应答题号内,每个答案只占一行)
1.运行下面程序,单击CmdRun,在窗体上显示a的值是___(1)___;b的值是___(2)___;i的值是___(3)___ 。 Option Explicit
Private Sub CmdRun_Click()
Dim i As Integer,a As Integer,b As Integer a=1:b=10
For i=a To b Step a+1 a=a+1 b=b+1 i=i+1 Next i Print a,b,i End Sub
2.执行下面程序,单击Command1,数组元素a(3,2)的值是___(4)___,a(1,2)的值是___(5)___,a(2,3)的值是___(6)___。
Option Explicit Option Base 1
Private Sub Commandl_Click()
Dim n As Integer,i As Integer,j As Integer Dim a(3,3)As Integer,k As Integer n=3:k=1
i=n:j=(n+1)/2 a(i,j)=k
For k=2 To n*n i=i+1:j=j+1
If i>n And j<=n Then i=1
ElseIf i<=n And j>n Then j=1
ElseIf i>n And j>n Then i=i-2:j=j-1
ElseIf i<=n And j<=n And a(i,j)<>0 Then i=i-2:j=j-1