2023年河北省对口升学计算机专业理论试题(附答案)

1AC2AC3ABCD1AC2AC3ABCD4AC5AC6AC7ABCI)8AC9AB2023年河北省一般高等学校对口招生考试

计算机专业理论试题(A)留意事项：.本试卷共八道大题。总分240分。.第I卷"一、选择题"、第II卷"二、推断题”的答案填涂在机读卡上，其余各题答案写在答题纸上，答在试卷上不得分。用蓝黑钢笔、碳素笔或IMI珠笔答题。.答题前将密封线内项目填写清晰。第I卷(选择题共100分)一、选择题(本大题共50小题,每小题2分，共100分。在每小题所给出的四个选项中,只有一个符合题目要求，将正确选项填涂在机读卡上)计算机能够自动、精确、快速地依据人们的意图运行的最根本缘由是・・・・()采纳超大规模集成电路 B.CPU作为中心核心部件具有操作系统 I).具有存储程序和程序限制功能下列各组设备中，同时包括了输入设备、输出设备和存储设备的是・・・・()CRT显示器、CPU、CacheB.绘图仪、鼠标、健盘鼠标、绘图仪、光盘D.硬盘、打印机、LED显示器下列各组软件中，全部属于应用软件的是 ()程序语言处理程序、操作系统、数据库管理系统文字处理程序、编辑程序、MS-DOSWord2023、MySQL5.0、程序语言处理程序财务处理软件、Flash、WPS、Office2023在标准ASCIl码表中，数字、大小写英文字母的编码从小到大的次序是()大写英文字母、小写英文字母、数字B.数字、小写英文字母、大写英文字母小写英文字母、大写英文字母、数字I).数字、大写英文字母、小写英文字母TOC\o"1-5"\h\z存储300个24X24点阵的汉字字形码，所需的存储容量大小为 ()0.1728M个二进制位B.21600个字节42.1875K个字节D.0.3456M个二进制位运算器(ALU)的功能是 ()只能进行逻辑运算B.进行算术运算或逻辑运算只能进行算术运算D•做初等函数的计算以下关于病毒的描述,正确的是 ()计算机病毒只在可执行文件中传播计算机病毒主要通过读/写存储器或网络进行传播只要删除全部感染了病毒的文件就可以彻底消除病毒计算机杀毒软件可以查出和消除全部病毒在下列各数据中,数值最小的是 ()(156)8B.(139)ιo(2FF)i6D∙(Ioiooooi)2在WindoWSXP中，关于"画图"工具，以下说法不正确的是 ()点击"起先"搜寻”，输入"画图”可以找到"画图”工具点击“起先"-"全部程序”-"附件"，可以找到"画图"工具C.打开"限制面板"-"添加/删除程序"，可以卸载"画图”工具）.在"画图”工具图标上点右键，可以将其添加到''起先”菜单10.在WindoWSXp中，不能在"任务栏"内进行的操作是 （）A.窗口之间切换 B.排列桌面图标C.设置系统日期和时间 D.启动"起先"菜单.在WindOWSXp中，以下关于文件名的说法，不正确的是 （）Λ.由于文件的扩展名运用'.'，因此文件命名时不能运用'.'.文件名可以运用通配符'?'和'*'C.给文件命名时字母可以运用大小写格式，但不能用大小写区分文件名D.文件名可用英文字母、数字和汉字命名.在WOrd2023中，将"计算机"一词设置为艺术字""，则以下方法中不正确的是 （）Λ.“编辑”-"替换" B."插入”-"图片"-"艺术字"C."视图”-"工具栏"-"艺术字"D.“格式"-"字体"-"文字效果”.在WOrd2023中，若要设置表格的外框线为双线，内框线为单线,如下图,正确的操作是 （）三年前北京各区平均租金表区名一居室二居室三居室东城区149718772150西城区144219532260崇文区128415512000宣武区123315531900朝阳区126515641943Λ.打开"表格"表格属性边框底纹"，选择"方框"吩咐.打开"表格"-"表格属性”-“边框底纹"，选择"全部"吩咐C.打开"表格”-“表格属性”-“边框底纹”，选择"自定义”吩咐D.以上都可以.在Word2023中，假如在文档顶部或底部添加图形或文本，正确的操作是（）A.通过"视图”-"页眉和页脚”进行设置B.通过''插入”-"页眉和页脚”进行设置C.通过“文件”-“页眉和页脚”进行设置D.以上都不对.在EXCel2023中,若要在"计算机专业考试成果单"表中，按输入公式方式填充“等级”歹|J,填充要求是："综合成果”高于90分（含90）为“优秀"，60分（含60）到90分（不含90）为“合格”，60分以下“不合格”。以下公式正确的是...（）ʌ.=IF（E3>=90,"优秀"，（IF（E3>=60,"合格","不合格"）））=IF（E3〉=90,"优秀"，IF（E3>=60,"合格",〃不合格"））=IF（E3>=60,"合格"，（IF（E3>=9O,"不合格","优秀"）））=IF（E3<6（）,"不合格"，（IF（E3>=90,"合格"，"优秀"）））.在EXCel2023中，如15题图"计算机专业考试成果单"所示，若突出显示"等级"为"优秀”的单元格，以下操作正确的是 （）Λ.运用"自动筛选”功能 B.运用“高级筛选"功能C.运用"条件格式”功能 1）.运用"IF”函数.在EXCel2023中，单元格中的数据显示为一串"#”时•，说明 （）Λ.公式中出现了O为除数的状况B.单元格数据长度大于该列的宽度C.出现语法错误 I).公式中含有不能识别的函数.在ViSUalBasic中，设A=“12345678”，则表达式Val(Right(A,4)+Mid(Λ,4,2))的值为 ()A.123456B.567845C.123445D.5723.在ViSUalBasic中,将文本框的内容全部显示为用户所定义的字符的属性是... ()ʌ.PasswordCharB.PasswordC.SelTextI).以上都不对.若评比优秀毕业学生的条件是:政治面貌(party)为团员,课程总分(total)大于285分，其中三门主课(Inarkl,mark2,Inark3)中有—门课为10()分，VisualBasic表达式应写为 ()Λ.PaTty="团员"andtotal>285andmark1=100orιnark2=100orιnark3=100B.Party="团员"andtotal>285ormark1=100ormark2=100ormark3=100C.(Party="团员"andtotal>285)and(mark1=100ormark2=100orιnark3=100)D.(Party="团员"ortotal>285)and(markl=100ormark2=100orrnark3=100).在ViSUaIBasic中,下面哪个选项属于控件的方法 ()Λ.ClickB.ChangeC.SetFocusD.Dim.在ViSUalBaSiC中，窗体上有一个吩咐按钮(其Name属性为Command1),运行以下程序，单击吩咐钮,其输出结果是 ()OptionBase1PrivateSubCommancllClickODimaa=Array(1,2,3,4)J=1Fori=4To1StepTs=s+a(i)*jj=j*10NextiPrintsEndSubʌ.4321B.234C.34D.123423.在ViSUaIBaSiC中,卜•而关于图片框(PictureBox)和图像框(Image)说法不正确的是 ()ʌ.图片框中可以装载其他控件 B.均可加赦图片C.图像框中可以装载其他控件 I).图像框比图片框占用更少内存.在ViSUalBasicΦ,有一个10个元素的数组,以下程序可将该数组逆置。即第1个元素与第10个元索交换，第2个元素与第9个元素交换……，第5个元素与第6个元素交换，为实现此功能，应在横线处填写 ()PrivateSubCommand1_C1ick()Dima(lTo10)ʌsIntegerDimiʌsIntegerI)iinpʌsIntegerDimtΛsIntegerDiinjʌsIntegerFori=1To10a(i)=iNextiForj=1To5t=a(j)NextjFori=1To10Printa(i)NextiEndSubʌ.a(j)=a(ll-j)a(ll-j)=tB.a(ll-j)=a(j)a(j)=tC.a(j)=ta(ll-j)=a(j)I).a(ll-j)=ta(j)=a(ll-j).在ViSUalBasic中，单击一次吩咐按钮,下列程序代码的执行结果为 ()PrivateSubCommandlClick()DimaΛsInteger,bʌsInteger,CʌsIntegera=2:b=3:c=4Printfun2(a,b,c)EnclSubPrivateFunctionfunl(xʌsInteger,yʌsInteger,ZʌsInteger)funl=2*x+y+3*zEndFunctionPrivateFunctionfun2(xʌsInteger,yAsInteger,ZAsInteger)fun2=funl(z,x,y)÷xEndFunctionA.27B.21C.17D.34.在ViSUalBasic设计阶段,为了清除窗体上的一个控件,下列正确的操作是()A.单击要清除的控件，然后按回车犍B.单击要消除的控件，然后按ESC健C.单击要清除的控件，然后按Del键D.以上都不对27.在ViSUalBasic中，下列程序段的输出结果是 ()X=5SelectCasex+1Case5,6,7Print*5,6,7"CaseOTo9Print"0to9〃CaseIs>=15Print"is>=5"EnclSelectΛ.5,6,7B.0-9C.0to9 I),is>=5.在ViSUalFoxPro中，运用DlMENSlONa(IO)定义了一个一维数组,正确的赋值语句是 ()a=10 B.a[10]=10C.STORE10a[3],a[4],a[5] I),a[2],a[3],a[4]=10.在ViSUaIFoXPrO中，下面有关视图的描述，正确的是 ()Λ.可以运用MODlFYSTRUCTURE吩咐修改视图的结构B.视图不能删除，否则影响原来的数据文件C.视图是对表的复制产生的I).运用SQL对视图进行查询时，必需事先打开该视图所在的数据库.在ViSUalFoxPro中，连续执行以下吩咐后，变量B的值为 ()SETEXACTOFFA="河北"B=(A="中国河北")?BΛ..F.B.中国河北C.河北I)..T..在ViSUaIFoxPro中，为了在报表中加入一个文字说明，应当插入一个..()A.表达式控件 B.域控件C.标签控件 I).文本控件.在ViSUalFoXPro中，已运用吩咐MoDlFYMENUιnymenu创建了一个菜单并生成了TOC\o"1-5"\h\z相应的菜单程序，则正确运行该菜单程序的吩咐是 ()Λ.DOιnymenu.mpr B.DOMENUmymenu.ɪnprC.DOMENUHiymenu D.DOιnyιnenu.在ViSUalFoxPro中，下述描述正确的是 ()A.利用查询可能修改数据B.利用视图可以修改数据C.查询和视图的功能相同D.视图可以定义输出去向.VisualFoxPro是一种关系型数据库管理系统，所谓"关系”是指 ()Λ.数据模型符合满意肯定条件的二维表格一个数据库文件与另一个数据库文件之间有肯定的关系C.各字段间的数据彼此有竹定的关系I)•各条记录中的数据彼此有肯定的关系35.在ViSUaIFoxPro中，变量a的值是"计算机网络工程师”，变量b的值是“程序设计员”，结果为“程序设计工程师”的表达式是 ()Λ.substr(b,1,4)-substr(a,6,3) B.left(b,8)-right(a,6)left(b,4)-right(a,3) D.以上都正确.用户在互联网上常常运用的一种信息查询工具是 ()A.电子公告板系统B.电子邮件C.网络加速器1).搜寻引擎37.网络中的计算机可以分为服务器和客户机，服务器主要用来向全网络供应某种协议的网络服务，客户机则主要用来访问、运用服务器上的服务。在下列关于客户机的描述中，错误的是 ()A.智能手机不能用作客户机 B.平板电脑可以作为客户机运用C.笔记本电脑可以用作客户机 D.高端台式机能用作客户机TOC\o"1-5"\h\z.下列哪种数据交换技术不属于存储交换技术 ()ʌ.分组交换 B.报文交换 C.信元交换D.线路交换.ISO是下列哪个组织的英文简写 ()Λ.国际电报电话询问委员会 B.国际标准化组织C.电气和电子工程师协会 I).电子工业协会.在运用IE阅读器过程中点击"主页"按钮，下列说法正确的是 ()ʌ.在IE中显示最近访问过的网页 B.访问MiCroSoft公司的主页C.访问百度公司的主页D.用户在IE中自定义的主页41•网络阅读器通常运用的协议是HTTP,该协议在服务器上运用的默认端口号为....()Λ.21 B.25 C.80 D.23.如下图所示，计算机A向计算机B发送数据包，过程为：计算机A通过网络1向路由器C发送数据包1；路由器C通过网络2向路由器I)发送数据包2；路由器D通过网络3向计算机B发送数据包3。计算机及路由器的关健参数已经在邻近位置给出。问：在数据包传输过程中，封装在数据包2中的口的Ip地址和目的MAC地址是 ()Λ.192.168.3.10和192.168.10.200和192.168.3.10和192.168.30.100和.Unix是一种网络操作系统,可以安装运行TCP/IP协议。有一台计算机安装了UniX操作系统和TCP/1P协议，下列说法中错误的是 ()A.该计算机在联网后具有所在网络唯一的IP地址。B.该计算机网络参数中可以设置网关参数。C.该计尊机不能访问安装WindOWS网络操作系统的计算机网络。D.该计算机可以按域名访问互联网网站。.下列关于UDP协议的描述中正确的是 ()A.不行靠 B.传输过程不透亮 C.面对连接I).有序传送数据包.在TCP/IP协议体系中，ARP协议的作用是 ()A.解析端口和服务类型的对应关系B.解析MAC地址和端口的对应关系C.解析IP地址和域名的对应关系D.解析IP地址和MAC地址的对应关系.在OSl网络参考模型中，能够确定网络接头及其电器性能标准的是••••()A.传输层协议 B.网络层协议 C.数据链路层协议 D.物理层协议.为了提高网络平安性、防止网络服务器遭遇黑客攻击，目前常常采纳的技术是...()ʌ.双机热备份技术 B.生物特征识别技术 C.数据加密技术 D.防火墙技术.在下列网络调试吩咐中，可以用来测试两台机器之间是否有物理通路的是()Λ.netstatB.ipconfigC.pingD.telnet.IP地址129.10.10.10属于下列哪类IP地址 ()Λ.D类地址B.C类地址C.B类地址D.A类地址.若干计算机运用交换机和双绞线、应用TCP/IP协议组成了一个局域网，并通过一台路由器与互联网连接。在为计算机设置网络参数时，下列哪个网络参数没有必要进行设置 ()Λ.DNS服务器B.IP地址C.WINS服务器D.默认网关A网络1数据包201.6a.75.66.Of.11网络3网络2数据包3数据包1路由器C路由器D第II卷(非选择题共140分)二、推断题(本大题14小题，每小题I分，共14分。将答案填涂在机读卡上，正确的填涂"《'格，错误的填涂“X”格).计算机能够进行逻辑推断，并依据推断的结果选择相应的处理。这说明计算机具有自动限制实力。().计算机断电后，RAM存储的信息不会丢失，ROM存储的信息会丢失。().在WindOWSXP中，回收站容量大小是固定的,不能调整。().在WindoWSXP中,任务栏可以放在桌面的四个边的随意边上。().在Word2023中，假如须要对插入的图片作精确定位,那么图片与文字的环绕方式应当选择"浮于文字上方”。().在Word2023中,运用"查找"吩咐时,可以区分全角和半角字符,也可以区分大小写字母。().在EXCel2023中，分类汇总的关健字段可以是多个字段。().在EXCel2023中,选中单元格按DeIete键,则单元格的内容被删除而格式保持不变。().在ViSUalBasic中，可以用LoadPiCtUre函数给图片框加载图片，但不能用此函数清除其中的图片。().在ViSUalEoxPro中,运用查询设计器创建的是一个包含SQL的SELECr语句的文本文件。().从技术上看，可以将一般交换机视为一种多端口的网桥，该设备工作在数据链路层。().由于网络运用了分层结构，所以当某层的实现技术发生改变时，与其相邻的层次必需进行相应改变，才能保证网络功能的正常实现。()13•网络服务器上的I)HCP服务，其主要功能是进行IP地址和域名之间的相互转换。()14•工作在数据链路层和网络层的设备都具有所在网络的唯一地址标识或能够判识所在层次的地址标识。()三、填空题(本大题共13小题，每小题2分，共26分。请将答案填写在答题纸上).进位计数制允许选用的基本数码的个数称为。.冯・诺依姓计算机体系中，中心处理器包含和。.计匏机中全部信息都是以形式存储的。.在WindoWSXP中，是内存的一块区域，用于各个应用程序之间相互交换信息。.在Word2023中，包含有最近运用过文档列表的是菜单。.在EXCel2023中，单元格E4中有公式"=$C$3+D4”，将公式复制到E6单元格中，单元格E6中的公式为。.在ViSUalBasic中,文本框的默认属性是。.在ViSUalBasic中,代数式12*的算术表达式是O.在ViSUalFoxPro中，要屏蔽系统菜单,运用吩咐。.在ViSUalFoxPro1I1,一个表只能建立一个的是索引。.在OSl网络参考模型中，传输层传送信息的组织单位是。.用来代表本机IP地址的第一个字段的值是（清填写十进制数）。.（请填写设备名称）可以按不同的网络协议完成数据包格式的转换，从而将环型网络和总线型网络进行互连。四、依据已知的环境与题意，写出相应的ViSUalFoxPro操作吩咐或SQL语句，要求每小题用一条吩咐或语句完成（本大题共5小题，每小题4分，共20分，请填写在答题纸上）。现有数据库"HETONG.DBC",其中包含表"TABHEToNG据BF"，该表有以下字段：编号（C,10）、供方（&50）、合同编号（C,10）、签订地点C50）、数量（N,10,0）,需方（&50）。相应的数据库和表已打开，写出实现下述功能的吩咐（留意：每个吩咐只能写一条语句，多于一条不得分）。.以"合同编号”为关键字建立降序的候选索引，索引名为"1仃”，复合索引文件名为HTBH.CDXo（用ViSUalFoxPro吩咐）.将全部“供方”为"阳春白雪集团"的全部记录的"签订地点"改为"金阳大厦"（用ViSUa1FoXPrO吩咐）.查询统计"TABHETONG,,表中不同需方"数量”的最大值，并将结果从打印机上打印出来。（用SQL语句）计算机专业理论试题第7页共13页.修改表"TABHETONG"的结构，删除"合同编号”字段的默认值。（用SQL语句）.删除"TABHETONG"表中“供方”为"百得公司”或“数量”小于500的记录。（用SQL语句）五、程序分析（本大题共2小题，每小题5分，共10分，读程序并分析结果，请填写在答题纸上）I.阅读下面的ViSUalBasic程序，循环体中的语句S=s+2共执行了次。PrivateSubCommandl_Click（）DimaAsInteger,bAsInteger,CʌsIntegerDimiΛsInteger,SʌsIntegera=5:b=2:c=2:s=ODoWhileb<=aForj=1To200Stepcs=s+2Nextjb=b÷cLoopPrintsEndSub2.有数据表JY∙DBF的内容如下:(注：日期格式为"月/日/年")Record#借书证号借书日期1001002/01/162000701/01/163000611/03/154001002/17/16数据表JYR.DBF的内容如下:Record#借书证号姓名职称10006孟小梅教授20010郑财勇讲师30007王志军助教有ViSUalForPro程序TX.prg如下：CLEARSTORE12TOTASTORE18TOTBSTORE0TOTC,TSDOJSWITHTΛ,TB1TC,TSSELECT1USEJYRINDEXON借书证号TAGGYROFGYRYSELECT2USEJYH=IDOWHILE.NOT.EOF()TE=DATE()-借书日期IFTE>(TS-TΛ*2)*IOSELECTISEEKB•借书证号IFTE>(TS-27)*10OR职称◊'教授'?姓名+'同志，您借的书已过期，请归还'H=H+1ENDlFSELECT2ENDIESKIPENDDORETURNPROCEDUREJSPARAMETERSTΛ,TB,TC,TSTC=MAX（TA,TB）DOWHILETC<=TΛ*TBIFTC%TA=OANDTC%TB=OTS=TCEXITENDlFTC=TC+1计算机专业理论试题第8页共13页ENDDORETURNENDPROCEDURE请分析职称为"教授"和其它不是“教授”的老师借书的最多天数分别是和。设系统的当前日期为2023年3月19H,程序将显示（填姓名）老师的还书信息。六、写出下列程序的运行结果（本大题共5小题，每小题5分，共25分，请填写在答题纸上）.分析下面ViSUalBasic程序段。窗体中有一吩咐按钮（名称为B6）。PrivateSubB6_Click（）DimnumlʌsIntegerI）iinnuιn2AsIntegerDimnumʌsIntegerDimiʌsInteger,kʌsIntegernuml=InputBox（,znuml=zz）nuιn2=InPUIBcX（"nuιn2="）num=1：i=2Ifnuml>num2Thenk=num2Elsek=numlDoWhilei<=kIfnumlModi=0ʌndnuιn2Modi=0Thennum=iEndIfi=i÷1LoopPrintnumEnclSub窗体启动后单击吩咐按钮,分别给numl和num2赋值为18和27,输出变量num的值为。.分析下面ViSUalBasic程序段,如图所示,界面中左侧是列表框（名称LiSt1）,显示省份名称,右侧从上向下分别是文本框1（名称TeXl1）,文本框2（名称Text2）,吩咐按钮（名称Comrnandl）。PrivateSubCommand1ClickO1)iiniAsIntegerFori=0ToListl.ListCount-1IfTrim(Text1.Text)=Listl.List(i)AndListl.Selected(i)ThenText2.Text=Mid(Listl.List(Listl.Listindex),1,2)ExitForElseText2.Text=〃其它〃EnclIfNextiEnclSubPrivateSubFormLoad()Listl.ʌddɪtem"河北省"LiStLAddltem"河南省〃LiStLAddItenI"湖北省"LiStLAddItCIn"山东省"Listl.Addltem"湖南省"EndSub窗体启动后，选中列表框中"湖北省"项目，并在文本框1中输入"湖北省"，单击吩咐按钮，文本框2显示的内容是。.有ViSUalForPro程序如下:CLEARINPUT"请输入数据："TOAXB7CAS(ΛXB,1)FUNCTIONCASPARAMETERSnʌmount,IsDWnDZS=CDE(RTRJM(LTRIM(STR(nʌmount,18,2))),"・"，"")CHZDX="零壹贰叁肆伍陆柒捌玖"CDW二"分角元拾佰仟万拾佰仟亿拾佰仟万拾佰仟亿"cRMBDX=""nCd=LEN(nDZS)FORI=ITOLEN(nDZS)CNumbers=SUBSTR(cIIZDX,INT(VΛL(SUBSTR(nDZS,1,1))*2+1),2)计算机专业理论试题第9页共13页IFIsDW=IcDWs=SUBSTR(cDW,nCd*2-l,2)

ELSEcDWs=SPΛCE(0)ENDIFcRMBDX=cRMBDX+cNumbers+cDWSnCcl=nCd-lENDFORFORI=LEN(nDZS)+lTO7CNumbers=SUBSTR(cHZDX,ɪNT(VΛL(SUBSTR(nl)ZS,ɪ,1))*2+1),2)IFIsDW=IcDWs=SUBSTR(cDW,I*2-1,2)ENDIFcRMBDX=cNumbers+cDWS+cRMBDXENDFORRETURNcRMBDXFUNCTIONCDEPARAMETERSnΛmountY,nɪ)ot,nREPCRMBDE="〃FoRI=ITOLEN(nΛmountY)IFSUBSTR(nAmountY,1,1)〈〉"・"CRMBDE=CRMBDE+SUBSTR(nAmountY,I,1)ENDlFENDFORRETURNcRMBDE运行上面的程序，输入123.4,显示的结果为4•现有2个表，分别是"JSB.DBF"、"KCB.DBF"。其中"JSB”表的结构为:楼号(N,2,0)、教室名(&5)、容纳人数(N,4,0),是否占用(L)；"KCB”表的结构为:课程名(C,20)、选课人数(N,3,0),各表中数据如下：JSB.DBE记录号楼号教室名容纳人数是否占用1234123456711223331-3041-2052-1032-2043-1033-1043-201120.T.80.T.70.T.80.F.30.T.65.F.100∙F.KCB.DBF记录号课程名选课人数1计算机基础352操作系统60有如下ViSUalFoxPro程序:DIMEJIZHKl,1)SELECT楼号,教室名，容纳人数,是否占用FROMJSBINTOTABLELINSHlALTERTABLELINSl11ΛDI)CIiAZIlIN(3,0)USEACCEPT"请输入课程名:*TOKCMSELECT1USEKCBINDEXON课程名TAGΛBCSEEKKCMSELECT2USELINSHIREPLACEALLCI1ΛZIIIWITH容纳人数-A.选课人数DELETEALLFORCHΛZHI<OOR是否占用=.T.PACKSELECTMIN(CHΛZHI)I-ROMLINSIiIINTOARRAYJIZHIGOTOPJIEGUO="DOWHILENOTEOF()ifChazhi=Jizhi(i,i)JlEGUo=JlEGUO+A.课程名+STR(楼号)+""+教室名ENDlFSKIP计算机专业理论试题第10页共13页ENDDO?JIEGUO运行上面的程序，输入"操作系统"，显示的结果是：5.现有数据库文件WATER.DBC,包含2个表,分别是WATERMETER.DBF和USEB.DBF。其中WATERMETER表的结构为：水表编号(C,8),本月读数(N,10,2),上月读数(N,10,2)、运用数(Njo,2)；USEB表的结构为:户主姓名(C,10)、房间编号(C,6)、水表编号(C,8)。其表中数据如下：WATERMETER.DBF记录号水表编号木月读数上月读数运用数13-1001-A235.67201.3423-1002-B678.34450.0032-0101-A289.23200.43USEB.DBF记录号户主姓名房间编号水表编号1张斌3-10013-1001-A2王阳新3-10023-1002-B3马国庆2-01012-0101-Λ新建一个表单，表单的Name属性为FOrm1,程序运行时的界面如下图所示：表单中，有一个标签,其Name属性为Label1,Caption属性为"户主姓名："；有两个文本框，其Name属性分别为TeXtI和TeXt2：一个吩咐按钮,其Name属性为Commandl,Caption属性为"计算"；有一个选项按钮组,其Name属性为OPtiOngroUPL其中包含两个单选按钮,一个的Name属性为OPtionI、Caption属性为"1-9楼"，另一个的Name属性为OPtion2、Caption属性为"10楼以上”。Coinmandl的CIiCk事务代码如下：(代码中行末的分号为逻辑行连接符)OPENDATABASEWΛTI∙RUPl)ATEWΛTERMETERSET运用数=本月读数-上月读数SELECT(MAX(运用数)+MIN(运用数))/2ΛSΛBFROMWATERMETERINTOTABLEMΛBUSEMΛBGOTOPXAB=ABXM=TRIM(TIIISFORM.TEXTl.TEXT)SELECT水表编号,运用数FROMWATERMETERWHERE水表编号IN(SELECT：水表编号FROMUSEBWHERE户主姓名=XM)IFTHISFORM.OPTlONGROUP1.OPTION!.VALUE=IIF运用数›XABJIEGU0=XAB*3.5+(运用数-XAB)*10ELSEJIEGUO=运用数*3.5ENDIFELSEIF运用数〉XABJIEGU0=XAB*3.5+(运用数-XAB)*10+50ELSEJIEGUo=运用数*3.5+50ENDIFENDIETHISFORM.TEXT2.VALUE=XM+*"+"应收金额="+STR(JIEGUO)运行上面的表单,在TeXtl中输入"王阳新”，选择单选按钮"10楼以上"，单击"计算"选钮，则在Text2中显示的是：七、VisualBasic程序改错(本大题共2小题，每题5分，共10分，每个程序有两个错误行，请在答题纸上写出错误行代码和对应的正确代码，改对一处得一处分，改错不减分。注：要把整行写完整).下面的程序是利用随机函数产生10个1到30之间的随机整数，然后把产生的这计算机专业理论试题第Il页共13页些整数放入数组b中，并按肯定规则放入数组a中。存放数组a中的规则是：(I)假如产生的是1到9之间(含1和9)的数，则干脆放入数组a中。(2)假如产生的是大于9的数，则按如下方法存放：偶数则把十位数字放入数组a中，奇数则把个位数字放入数组a中。如:假设产生的整数是:22,17,18,9,10,24,1,23,25,22。放入数组a中的数字是：2,7,1,9,1,2,1,3,5,2,程序中有两处错误，请将错误行和相应的正确行写在答题纸横线上。OptionBase1PrivateSubCOmn)andl一CliCk()Dima(10)AsIntegerDimb(10)ʌsIntegerI)iiniΛsIntegerDimnumʌsIntegerFori=1To10

num=Int(Rnd*30)b(i)=numIfnum>=1Λndnum<10Thenb(i)=numElseIfnumMod2=0Then&(i)=num∖10Elsea(i)=numMod10EndIfEndIfNextiFori=1To10Printb(i);NextiPrintFori=1To10Printa(i);"";NextiEndSub.以下程序的功能是：产生一个3行4列的数组并赋值，再用InPUtboX函数输入一个列号，然后对数组中的该列进行由小到大排列。如产生的数组是：221719I。221719I。2422325221813输入一个列号3,则排序后为227189io241232522213程序中有两处错误，请将错误行和相应的正确行写在答题纸横线*OptionBase1PrivateSubCommand1Click()Dima(3,4)AsIntegerDimiʌsInteger,jʌsInteger1)iincolʌsIntegerDimtΛsIntegerFori=1To3ForJ=1To4a(i,j)=20+Int(Rnd*30)Printa(i,j);NextjPrintNexticol=InPUtBox("COI=〃)Fori=1To3Forj=2To4Ifa(i,col)>a(j,col)Thent=a(i,col)a(i,col)=a(j,col)a(j,col)=tEnclIfNextjNextiPrintFori=1To3Forj=1To4Printa(i,j);NextjPrintNextiEnclSub八、程序填空(本大题共7个空，每空5分，共35分，按程序要求在答题纸上填入相应的内容，使程序完整正确)(VisualBasic题)下面的程序是输入偶数个字符的字符串给变量c,然后从字符串两端分别截取字符赋给Cl和c2,每次截取一个。假如是数字字符，则按"前端截取放前、后端截取放后”的方法存入数组a中；假如是其它字符，则不存放。然后依次分别截取下一个字符，并用同样的方法处理，直到全部字符处理完为止。如输入的字符为12AB34C56D78,存入数组a中的依次为1,8,2,7,6,3,5,4。最终显示出来。请在空白位置填写正确的代码。OptionBase1PrivateSubCommand1_C1ick()DimcʌsStringDimclAsStringDimc2ʌsStringI)iina(20)AsIntegerDimiʌsIntegerDimjʌsIntegerDimkΛsIntegerc=InputBox(zzc=zz)j=Len(c):i=1k=1DoWhilei<jcl=Mid(c,i,1):c2=Mid(c,j,1)Ifcl>=〃0〃ʌndcl<="9"Thena(k)=Val(cl):k=k+1Ifc2>=〃0〃Andc2<=〃9"Thena(k)=Val(c2):k=k÷ɪi=i+1:(1) LoopPrintcFori=1To(2)Printa(i);Nexti

EndSub（VisualBaSiC试题）窗体（运行后如图所示）中有一个标签（名称为LabeII）,用于显示其下方滚动条的ValUe值,滚动条（名称为HSl）最小值和最大值分别是1和5。滚动条下方是组合框（名称为CombOl）,显示内容如图及程序。滚动条右侧是列表框（名称为LiSt1）,显示内容如图及程序。列表框下方是文本框（名称为TeXt1）,用于显示列表框中的某项内容,有肯定时器控件，初始设置TimerLEnabled为True,timerl.Interval=1000,定时器的TimerI一TimerM务功能是：（1）把组合框选定的值赋给滚动条的ValUe屈性；（2）标签显示当前滚动条的值；（3）文本框显示与组合框中位置.一样的列表框中的内容。窗体的LOad事务是给组合框中添加1到5,给列表框中添加A到E,组合框显示第一项内容1。谓在空白位置填写正确的代码。PrivateSubFormLoad()COlnbOI.AddItem"1"ComboLAddItem"2"Combol.Λddltem"3〃Combol.AddItein〃4"Combol.