江苏省二级VB考试真题Word格式文档下载.docx

1、A 4.7GBB . 8.5GBC 17GBD 25GBB8 下列有关 PC 机常用 I O 设备 （ 性能 ） 的叙述中，错误的是 _（8）_ 。A 通过扫描仪扫描得到的图像数据可以保存为多种不同的文件格式，例如 JPEG 、TIF 等B 目前数码相机的成像芯片均为 CCD 类型，存储卡均为 SD 卡C 刷新速率是显示器的主要性能参数之一，目前 PC 显示器的刷新速率一般在 60Hz以上D 从彩色图像输出来看，目前喷墨打印机比激光打印机有性价比优势D9 下列有关计算机软件的叙述中，错误的是 _（9）_ A 软件的主体是程序，单独的数据和文档资料不能称为软件B 软件受知识产权 （ 版权 ） 法

2、的保护，用户购买软件后仅得到了使用权C 软件的版权所有者不一定是软件的作者 （ 设计人员 ）D 共享软件允许用户对其进行修改，且可在修改后散发C10 PC 机从硬盘启动 Windows XP 操作系统是一个比较复杂的过程 在这个过程中，它需要经过以下这些步骤：I 装入并执行引导程序 读出主引导记录装入并执行操作系统 加电自检在上述步骤中，正确的工作顺序是 _（10）_A I 、 、 、 B 、 I 、 lI 、 C 、 II 、 I 、 D 、 、 II 、 ID11 下列有关算法和程序关系的叙述中，正确的是 _（11）_A 算法必须使用程序设计语言进行描述B 算法与程序是一一对应的C 算法是

3、程序的简化D 程序是算法的具体实现A12 采用 ADSL 方式接入因特网时， ADSLModem 将电话线传输信道分为三个信息通道：语音通道、上行数据通道、下行数据通道。下列有关这三个信息通道的叙述中，错误的是 _（12）_ A 语音通道的频带最宽、采用的频率最高，以保证电话通话的质量B 通常上行数据通道的数据传输速率低于下行数据通道的数据传输速率C ADSL 的数据传输速率是根据线路情况自动调整的D 这三个信息通道可以同时工作，即可以同时传输信息 （ 数据 ）B13 无线局域网是以太网与无线通信技术相结合的产物，其采用的网络协议主要是 IEEE制订的 _（13）_ 。A IEEE 802 3

4、B IEEE 802 11C IEEE 1394D IEEE 1394bC14. 在因特网中目前主要采用 IPv4 协议， IP 地址长度为 32 位，只有大约 36 亿个地址。新的第 6 版 IP 协议 （IPv6） 已经将 IP 地址的长度扩展到 _（14）_ 位，几乎可以不受限制地提供地址。A 48B 64C 128D 256 D15 因特网由大量的计算机和信息资源组成，它为网络用户提供了非常丰富的网络服务。下列与 www 服务相关的叙述中，错误的是 _（15）_ 。A. WWW 采用客户机 服务器工作模式B 网页到网页的链接信息由 URL 指出C 浏览器是客户端应用程序D 所有的网页均

5、是 HTML 文档C16 目前 Windows 操作系统支持多种不同语种的字符集，即使同一语种 （ 例如汉语 ） 也可有多种字符集。下列字符集中，不包括 “ 臺 ” 、 “ 灣 ” 等繁体汉字的是 _（16）_ 。A GBKB Big5C GB2312D GBl8030B17 下列与数字图恸图形相关的叙述中，错误的是 _（17）_ 。A 彩色图像在数字化过程中需进行分色处理，然后对不同的基色进行取样和量化B 如果某 RGB 图像的像素深度为 12 ，则可表示的颜色数目为 2（应为2的12次）（由RGB三基色组成的彩色图像，若三个分量中的像素位数分别为4,4,4，则该图像的像素深度为12，不同颜

6、色的数目为：2（4+4+4）=212=4096）C 数码相机常用 JPEG 格式保存图像文件，该格式的图像大多采用有损压缩编码D 图形是计算机合成的图像，也称为矢量图形A18 文件的扩展名用于标记文件的类型，用户应该尽可能多地知晓各类文件的扩展名。下列文件中，属于数字视频的文件是 _（18）_A ABC RMVBB ABC DLLC ABC PDFD ABC MIDIA19. 下列几种类型的系统软件中，不属于计算机集成制造系统 （CIMS） 范畴 （ 或者说 , 与 CIMS 无直接关系 ） 的是 _（19）_ 。A GISB CAMC MRPD ERPC20 下列有关 Micr o s o

7、ft P o werP o int 2003 和 Micros oft FrontPage 2003 软件的叙述中，错误的是_ （20）_ 。 型用 PowerPoint 编辑演示文稿时，可以将每张幻灯片保存为 JPEG 图片 利用 PowerPoint 编辑演示文稿时，可以录制声音 。 利用 FrontPage 制作网页时，无法直接查看网页的 HTML 代码 利用 FrontPage 制作网页时，背景图片可以设置为 “ 水印 ” 效果第二部分 Visual Basic 程序设计一、选择题 21 以下说法中，正确的是（21） D。A 属性是对象的特征，所有的对象都有相同的属性B 属性值只能在属

8、性窗口中设置C 在程序中可以用赋值语句给对象的任何一个属性赋值D 对象的运行时属性不出现在对象属性窗口中22 下面 4 个语句中，错误的是（22） B。A N=InputBox（ ” 输入 N: ” ,5）B . InputBox（ “ 输入 N:C MsgBox ” 请回答 ”D K=MsgBox（” 请回答 ”）23 若设 X=1,Y=2 ，则不能在窗体上显示出 ”A= 3” 的语句是（23） A。A Print A=X+YB Print ”A=” ； X+YC Print ”A=”+Str（X+Y）D Print ”A=”&24 表达式 InStr（4,”abcabca” ， ”c”）+

9、Int（2.5） 的值为（24） B。A 7 B 8 C 5 D 925 以下有关数组的说法中，错误的是 （25） C。A 用 ReDim 语句重新定义动态数组时，其下标的上下界可以使用赋了值的变量B 用 ReDim 语句重新定义动态数组时，不能改变已经说明过的数组的数据类型C 使用 ReDim 语句一定可以改变动态数组的上下界D 定义数组时，数组维界值可以不是整数26. 以下有关过程的说法中，错误的是 （26） D。A 不论在 Function 过程中是否给函数名赋过值，都会返回一个值B 不能在 Function 与 Sub 过程内部，再定义 Function 或 Sub 过程C Funct

10、ion 过程与 Sub 过程，都可以是无参过程D 过程名可以和主调过程的局部变量同名27. 下列关于菜单的说法中，错误的是 （27） C。A 除了 Click 事件之外，菜单项不能响应其他事件B 菜单的名称项 （Name 属性 ） 不可缺省C 只有当代码窗口为当前活动窗口时，才能打开菜单编辑器（只有当某个窗体为当前活动窗体时，才能打开菜单编辑器）D 菜单项的快捷键不能任意设置28 设 a=1 ， b=2 ， c=3 ，逻辑表达式 ab Xor cnotandor） A。A False B -1 C True D 129. 在窗体 Form1 中用 “Public Sub Fun（x As In

11、teger,Y As Single）” 定义过程 Fun ，在窗体 Form2 的某事件过程中定义了变量 I 和 J 均为 Integer ，若要在此过程中调用 Form1 中的 Fun 过程，则下列语句中正确的（29） D。A Call Fun（I ， J）B Call Forml.Fun（I ， J）C Fun I ， （J）D Form1.Fun I ， （J）30 以下有关文件操作的说法中，正确的是（30） C。A 在某过程中用 Open 语句打开的文件，只能在这个过程中使用B 不能用 Output 、 Append 方式打开一个不存在的顺序文件（C 在 Input 方式下，可以使用不

12、同的文件号同时打开同一个文件D 在不同的过程中，可以用同一个文件号同时打开不同的文件Open For As # Len = 缓冲区大小Input：打开文件后，从文件中读取数据Output：打开文件后，向文件中写入数据，即重写一个顺序文件Append：打开文件后，向文件末尾添加数据若指定Input方式，则当指定文件不存在时产生一个错误；若指定Output或Append方式，则当文件不存在时建立该文件，文件已存在时写入的数据，前者覆盖，后者追加。所以Open具有建立和打开文件的双重功能。对同一文件用一种方式打开后，在关闭之前，不能再以另一种方式打开。二、填空题 1 执行下列程序，单击按钮 Comm

13、and1 ，窗体上显示的第一行内容是 _（1）_, 第二行是 _（2）_ ，第三行内容是 _（3）_ 。Option ExplicitPrivate Sub Command1_Click（）Dim a As Integer,b As Integera=4b=3Do Until a10b=b 2Do Until ba=（a+b）2+bb=b+5Print a,bLoopa=a-3End Sub2. 执行下面程序，当单击 Cmd1 时，在窗体上显示的第一行内容是 _（4）_ 第二行的内容是 _（5）_ ，第四行的内容是 _（6）_ 。Private Sub Cmd1_Click（）a=1b=2Pr

14、int fun（2*b ， fun（a,（b）Print a;bPrivate Function fun（x As Integer,y AsInteger） As Integerx=x+2y=x-y+3fun=x+yPrint funEnd Function3 执行下面的程序，单击 CmdRun 后，数组元素 a（1 ， 2） 的值是 _（7）_,a（2,1） 的值是_（8）_ ， a（3 ， 2） 的值是 _（9）_Option Base 1Private Sub CmdRun_Click（）Dim A（3 ， 3）As Integer,i As Integer,j As Integer,k

15、 As Integer,n As Integern=3i=1 ： j=nA（i ， j）=1For k=2 To n*nIf i+1n Theni=n-j+2 ： j=1ElseIf i+1j=j-i ： i=1Elsei=i+1 ： j=j+1End IfA（i,j）=kNext kFor i=1 To nFor j=1 To nPrint A（i ， j）;Next JPrintNext i4 运行程序，在文本框 Text1 中输入用空格分隔的 4 位二进制数 1001 、 0101 和 0110 。单击 “ 处理 ” 按钮，在多行文本框 Text2 中第一行显示 _（10）_ ，第二行显

16、示 _（11）_ ，第三行显示 _（12）_Private Sub Cmd1_Click0Dim S（3） As String ， n As IntegerDim i As Integer,k As Integerk=1For i=1 T0 3S（i）=Mid（Text1 ， k ， 4）k=k+5Call Transform（n ， S（i）Text2=Text2 & n & vbCrLfPrivate Sub Transform（n As Integer,S As String）Dim k As Integer,i As Integer,L As IntegerL=Len（S）If Val

17、（Mid（S ， 1 ， 1）=1 Thenn= - （2（L - 1）n=0For i=2 To Lk=Mid（S ， i ， 1）n=n+k*2（L-i）5 执行下列程序，单击 CmdRun 按钮，则窗体上显示的第一行是 _（13）_ ，第二行是 _（14）_ 最后一行是 _（15）_Dim n As IntegerFor n = 4 To 7If Fun1（n, Sqr（n） ThenPrint n; SSHSNext nPrivate Function Fun1（n As Integer, i As Integer） As BooleanIf i = 1 ThenFun1 = True

18、ElseIf n Mod i 0 ThenFun1 = Fun1（n, i - 1）Fun1 = False6 下面程序的功能是求 S 的值。计算到第 k 项的值小于等于 1O 为止请完善本程序。Private Sub CmdSum_Click（）Dim s As Single ， x As Single ， k As Integer,t As Singlex=CSng（Text1.Text）_（16）_DOt=pt（x ， k）s=s+tk=k+1Loop Until tO ThenIf yzh（a ， st） Then List1.AddItem i & “ ： ” & stErase a

19、Private Function yzh（a（） As Integer,st As String）As BoclleanDim i As Integer,j As IntegerDim suml As Long ， sum2 As Long ， stl As String ， st2 As StringFor i=1 To UBound（a）For j=2 To Sqr（a（i）If a（i） Mod j=0 Then Exit ForIf _（21）_ Thensum1=sum1+a（i）st1=st1 & a（i） & ”+”EIsesum2=sum2+a（i）st2=st2 &If su

20、m1*2=sum2 Then_（22）_st=”（” & Left（st1 ， Len（st1）-1） & ”）*2=”& Left（st2,Len（st2）-1）8 本程序的功能是求 -128 +127 之间整数 n 的 8 位 2 进制补码。采用的算法是：若 nO ，则直接将其转换为相应的 7 位 2 进制数，前面的符号位设定为 “O” ；若 n=0 Thenbm=” 0” & d2b（n）n=n+128bm=_（24）_Private Function d2b（n As Integer）As StringDim p As IntegerDop=n Mod 2d2b=CStr（p） & d

21、2bn=n2Loop Until _（25）_d2b=Right（” 000000” & d2b ， 7）9 本程序的功能是，按从大到小的次序给一组正整数标记序次。程序的算法是：先找出原数组中所有的最大数，假如有 n 个最大数，它们序次均标记为 1 ，已处理的数据值改为 -99 ：再找出所有的次大数，它们的序次标记为 n+1 直到所有数据处理完毕。 （ 说明：数组 sn 用于存放数组 a 中相应的各个元素的序次，数组 b 用来保留原始数据 ）Dim a（10）As Integer,sn（10）As Integer,b（10）As Integer,i As IntegerFor i=1 To lOa（i）=Int（Rnd*61）+40b（i）=_（26）_Text1=Text1 & Str（a（i）Call order（a ， sn）For i=1