江苏省高校等考（CCT）二级（VB）模拟试卷1

下列关于数字技术与微电子技术的叙述中，错误的是________。数字技术的处理对象是“比特”，一个触发器可以存储2个比特在数据通信时，远距离传输或者无线传输时需要用比特对载波进行调制现代集成电路使用的半导体材料主要是硅我国第2代居民身份证中使用了非接触式IC芯片

下列关于台式PC芯片组的叙述中，错误的是________。芯片组是主板上最为重要的部件之一，存储器控制I/O控制等功能主要由芯片组实现芯片组与CPU同步发展，有什么样功能和速度的CPU，就需要使用什么样的芯片组芯片组决定了主板上能安装的内存最大容量及可使用的内存条类型同CPU一样，用户可以很方便，很简单地更换主板上的芯片组

下列关于I/O设备的叙述中，错误的是________。目前平板电脑智能手机的触摸屏大多为“多点触摸屏”，可同时感知屏幕上的多个触控点扫描仪可分为手持式、平板式和滚筒式等类型，目前普通家用/办公用扫描仪大多为滚筒式目前一些型号的数码相机已具有拍摄视频和进行录音的功能为了降低成本，目前许多PC采用集成显卡，其显示控制器被集成在芯片组中

下列关于PC外存储器的叙述中，错误的是________。目前PC采用的硬盘，其盘片的直径通常为35英寸?25英寸或18英寸 U盘和存储卡都是采用闪烁存储器制作的，目前其容量大多为几GB至几十GB 目前固态硬盘的存储容量大多为数百GB，但其读写速度远不如传统硬盘(硬磁盘) 蓝光光盘是目前最先进的大容量光盘，单层盘片的存储容量可达25GB

下列关于Windows操作系统功能的叙述中，错误的是________。对于多任务处理，系统一般采用按时间片轮转的策略进行处理器调度系统采用了虚拟存储技术进行存储管理，其页面调度算法为“最近最少使用”(LRU)算法系统支持多种文件系统(如FAT32，NTFS，CDFS等)以管理不同的外存储器系统支持任何I/O设备的“即插即用”和“热插拔”

下列关于程序设计语言的叙述中，错误的是________。虽然机器语言不易记忆，机器语言程序难以阅读和理解，但目前还有很多人使用其编写程序汇编语言与计算机的指令系统密切相关，不同类型的计算机，其汇编语言通常不同 VBScript语言是VB的子集，用其编写的程序可以嵌入在HTML文档中以扩充网页的功能 Java语言是一种适用于网络环境的程序设计语言，目前许多手机软件就是用Java编写的

下列关于通信技术的叙述中，错误的是________。调制与解调技术主要用于模拟通信，在数字通信中不需要使用调制与解调技术使用多路复用技术的主要目的是提高传输线路的利用率，降低通信成本在数据通信中采用分组交换技术，可以动态分配信道资源，提高传输效率和质量数据通信网络大多采用分组交换技术，但不同类型网络的数据包格式通常不同

Internet使用TCP/IP协议实现了全球范围的计算机网络的互连，连接在Internet上的每一台主机都有一个IP地址，目前使用的是IPv4标准(32位地址)，下一代互联网将会采用IPv6标准，其IP地址为 ________。 48位 64位 96位 128位

下列关于字符编码标准的叙述中，错误的是________。在ASCII标准中，每个字符采用7位二进制编码在绝大多数情况下，GB2312字符集包含的1万多个汉字足够使用 Unicode字符集既包含简体汉字，也包含繁体汉字中文版 WindowsXP及其后的Windows系列操作系统均支持国标GB18030

由于采用的压缩编码方式及数据组织方式的不同，图像文件形成了多种不同的文件格式。在下列四种图像文件中，常用于网页上发布并可具有动画效果的是________。 BMP JPEG GIF TIF

以下有关对象事件过程的说法中，错误的是________。对象事件过程的参数由系统决定，用户不得随意添加或改变窗体事件过程名中的对象名为窗体的名称(Name属性值) 控件事件过程名中的对象名为控件的名称(Name属性值) 对象事件过程可以通过Call语句调用执行

设字符串变量a已赋值“VisualBasic”，以下表达式中运算结果等于2的是 ________。 InStr(a，“a“) InStr(Left(a，2)&Right(a，6)，“a“) InStr(Right(a，InStr(a，“a“))，“a“) InStr(Left(a，InStr(a，“a“))，“a“)

数学式 [*] 对应的VB表达式是________。 Abs(e^(2x+1)+Sin(3141592635/180))/(2xy+1)^(1/3) Abs(Exp(2x+1)+Sin(3141592635/180))/(2xy+1)^(1/3) Abs(e^(2x+1)+Sin(3141592635/180))/(2xy+1)^(1/3) Abs(Exp(2x+1)+Sin(35))/(2xy+1)^(1/3)

以下有关动态数组的说法中，错误的是________。动态数组可用ReDim语句重新说明其维数和大小不能用ReDim语句改变动态数组的数据类型含有Preserve关键字的ReDim语句只能改变数组最后一维的维上界主调过程中说明的动态数组只能在本过程中使用ReDim语句重新定义

以下有关自定义函数过程的说法中，错误的是________。自定义函数名的数据类型与形参自变量的数据类型有关未说明自定义函数名的数据类型时，返回函数值的类型为变体类型自定义函数过程内不得再定义其他函数过程自定义函数过程的形参中，可以包含数组参数

执行下面程序，单击Command1按钮后，列表框上显示的第一个列表项内容是 (1) ，最后一个列表项内容是 (2) 。 OptionExplicit PrivateSubCommand1_Click() DimstAsString，pAsString1，iAsInteger，jsAsIntegerst=“12233“ p=Mid(st，1，1)js=1 i=1Do i=i+1 IfMid(st，i，1) =pThenjs=js+1 Else List1.AddItemp&“:“&jsp=Mid(st，i，1) js=1 EndIf LoopWhilei

执行下面程序，在“输入:”文本框Text1中输入“12，3，5，18，9”后单击“输入数组”按钮Command1，则数组元素a(2)的值是 (3) ，在单击“数组处理”按钮Command2后数组元素a(2)的值变为 (4) 。 [*] OptionExplicitOptionBase1 Dima() AsInteger ’定义模块级数组 PrivateSubCommand1_Click() ’输入数组 DimiAsInteger，stAsString，jAsIntegerst=Text1.Text DoUntilInStr(st，“，“) =0i=InStr(st，“，“) j=j+1 ReDimPreservea(j) a(j)=Val(Left(st，i-1)) st=Right(st，Len(st)-i) Loop ReDimPreservea(j+1) a(j+1)=stEndSub PrivateSubCommand2_Click() ’数组处理 DimiAsInteger，tAsInteger，jAsIntegerFori=2ToUBound(a) Ifa(i)>a(1) Thent=a(i) Forj=iTo2Step-1a(j)=a(j-1) Nextj a(1)=tEndIf Nexti Fori=1ToUBound(a) Text2.Text=Text2.Text&Str(a(i)) Nexti EndSub

执行下面程序，单击命令按钮Command1后，窗体显示的第一行内容是 (5) ，第二行内容是 (6) ，第三行内容是 (7) 。 OptionExplicitDimKAsInteger PrivateSubCommand1_Click() DimAAsInteger，BAsIntegerA=11:B=2 K=Fun((A)，B)+Fun(A，A)PrintK EndSub PrivateFunctionFun(NAsInteger，MAsInteger)AsIntegerN=N2 K=K+N IfNMod2<>0ThenN=N+1 EndIf M=M+KFun=M+NPrintM，N EndFunction

执行下面程序，单击Command1按钮，则在窗体上显示的第一行内容是 (8) ，第二行内容是 (9) ，最后一行内容是 (10) 。 OptionExplicit PrivateSubCommand1_Click() DimaAsInteger，bAsStringa=27 Do b=fun(a)a=a5 LoopUntila=0Printb EndSub PrivateFunctionfun(nAsInteger)AsStringStaticsAsString s=CStr(nMod5)&s fun=sPrints EndFunction

完善程序。【要求】 1)打开“T盘”中“P1.vbp”文件，按参考界面形式编辑窗体界面，完善程序后，直接保存所有文件｡【题目】本程序的功能是生成由n(n通过InputBox函数输入)个3位升序数构成的随机数组｡所谓下面程序的功能是实现两个分数相加｡分数相加的一般步骤是先通分，分子相加，再约分｡如果结果的分子大于分母，则将其化为带分数｡ [*] OptionExplicit PrivateSubCommand1_Click() ’计算 Dimfz1AsInteger，fz2AsInteger，fm1AsInteger，fm2AsIntegerDimzsAsInteger，js1AsString，js2AsString DimgAsInteger，fzAsInteger，fmAsInteger js1=Text1.Textjs2=Text2.Text fz1=Left(js1，InStr(js1，“/“) -1) fm1=Right(js1，Len(js1) -InStr(js1，“/“)) fz2=Left(js2，InStr(js2，“/“) -1) fm2=Right(js2，Len(js2) -InStr(js2，“/“)) fm=lcd(fm1，fm2) fz=fz1(fmfm1) +fz2(fmfm2) (1) fm=fm/g ’约分 fz=fz/g ’化带分数 If (2) Thenzs=zs+(fzfm)fz=fzModfmText3.Text=zs EndIf Text4.Text=fzText5.Text=fm EndSub PrivateFunctionlcd(aAsInteger，bAsInteger)AsIntegerDimnAsInteger n=a DoWhilenModb<>0 (3) Loop lcd=nEndFunction PrivateFunctiongcd(ByValaAsInteger，ByValbAsInteger)AsIntegerDimrAsInteger Do r=aModba=b b=r LoopUntilr=0 (4) EndFunction