福建高职单招计算机专业模拟试卷(二).pdf

该【福建高职单招计算机专业模拟试卷(二) 】是由【小屁孩】上传分享，文档一共【6】页，该文档可以免费在线阅读，需要了解更多关于【福建高职单招计算机专业模拟试卷(二) 】的内容，可以使用淘豆网的站内搜索功能，选择自己适合的文档，以下文字是截取该文章内的部分文字，如需要获得完整电子版，请下载此文档到您的设备，方便您编辑和打印。:..----------------------------精品word文档值得下载值得拥有----------------------------------------------福建高职单招计算机模拟试卷(二)模拟试题学校:班级:姓名:成绩:一、选择题(30*4分=120分),计算机的发展至今经历了()4个年代。、中档计算机、高档计算机、、小型计算机、中型计算机、、晶体管计算机、小规模集成电路计算机、、兼容机、品牌机、()。()。,“计算机辅助设计”的英文缩写是()。()。,其ASCII码值最大的是()。,媒体分为()。、文字媒体、、、表示媒体、表现媒体、()这几部分构成的。、、键盘、、显示器、、控制器、存储器、,只能做输出设备的是()。“属性”对话框中,把一个文件设置为“隐藏”属性后,在“我的电脑”或“资源管理器”中,若想让该文件再显示出来的操作是()。“文件”菜单的“属性”“查看”菜单的“选项”命令,在“选项”对话框的“查看”选现卡中进行适当的设置。“查看”菜单的“刷新”“查看”菜单的“详细资料”()。,此时运行其他程序,则()。,----------------------------精品word文档值得下载值得拥有---------------------------------------------------------------------------------------------------------------------------------------------------------------------------:..----------------------------精品word文档值得下载值得拥有----------------------------------------------,有些菜单选项为灰色字符显示,这意味着这些菜单()。,可能出现的按钮组合是()。、还原、、、还原、、,使用组合键()可以退出应用程序。+Alt++++,为了快速实现全角和半角状态之间的切换,应当按的键是()。++++,用鼠标拖动()可以移动整个窗口。,启动应用程序的正确方法是()。,资源管理器左边窗口中的某文件夹左边标有“+”标记表示()。()。()。()。()。。A、Width或HeightB、Width和HeightC、Top或LeftD、,则应将其Alignment属性设置为。----------------------------精品word文档值得下载值得拥有---------------------------------------------------------------------------------------------------------------------------------------------------------------------------:..----------------------------精品word文档值得下载值得拥有----------------------------------------------\2值为()A、1B、2C、3D、。+===="123"(Rnd(x)*3+1)产生区间()内的随机整数A、[1,4]B、(1,4)C、(2,3)D、[1,3]=X+1的正确含义是。++>X+1是()A、算术表达式B、非法表达式C、逻辑表达式D、关系表达式二、填空题(20*4分=80分)。。**********转换成八进制数是。。,它是实现运算的部件。。。、和地址总线。。,目前使用较多、打印质量较好的打印机是。11集文字、图形、声音、活动图像于一身的计算机系统称为计算机。。,它们是系统、存档、和隐藏。,其大小是的。,要想使可操作的按钮变得不可操作,则应将该按钮的(1)属性设置为FALSE。(2)_______。(3)_____设计器上完成的。,要将窗体Form1从内存中卸载,应该使用语句(4)。(5)。-2^2+2^-2+(6)_____三、程序阅读(4*10分)1、下面程序的运行结果为___(1)____。mand1_Click()DimaAsIntegera=2Fori=1To3PrintF(a);NextiEndSub----------------------------精品word文档值得下载值得拥有---------------------------------------------------------------------------------------------------------------------------------------------------------------------------:..----------------------------精品word文档值得下载值得拥有----------------------------------------------PrivateFunctionF(aAsInteger)b=0b=b+1c=c+1f=a+b+cEndFunction2、下列程序输出结果为(2)。mand1_Click()Dima(1To4)AsIntegera(1)=5:a(2)=6:a(3)=7:a(4)=8Pa()Fori=1To4Printa(i),NextiEndSubPrivateSubP(b()AsInteger)Fori=1To4b(i)=2*iNextiEndSub3、下列程序输出结果为(3)。mand1_Click()a%=10b%=5Changea,bPrinta,bEndSubPrivateSubChange(ByValaAsInteger,bAsInteger)Tmp=aa=bb=tmpEndSub4、下述程序的运行结果是(4)。mand1_Click()a==(a,b)Printa,bEndSubPrivateSubfun(x,y)x=y*yy=y+xEndSub----------------------------精品word文档值得下载值得拥有---------------------------------------------------------------------------------------------------------------------------------------------------------------------------:..----------------------------精品word文档值得下载值得拥有----------------------------------------------5、下列VB程序是用来计算S=1!+2!+3!+........+n!的程序,请将程序补充完整。(说明:N!=1*2*3*4*......*N)PrivateSubForm_ClickN=Inputbox(“请输入N”)S=0FORI=1TO___(5)_________(6)________S=S+TNEXTIPRINT“S=”;SENDSUBfact(N,T)T=___(7)___FORJ=1TO____(8)__(9)NEXTJ___(10)______四、程序填空(4*10分)1、已建立了一个工程,该工程包括两个窗体,其名称(Name属性)分别为Form1和Form2,启动窗体为Form1。mand1,程序运行后,要求当单击该命令按钮时,Form1窗体消失,显示窗体Form2,请在(1)和(2)处将程序补充完整。mand1_Click()(1)Form1Form2.(2)EndSub2、数据过滤程序:从左边文本框输入任意文本,如果是数字字符,则显示在右边文本框中。运行结果如下图(文本框开始时为空)。(1)设置对象属性(2)编写代码对名属性名PrivateSub_____(3)______If____(4)_______Then______(5)_________EndIfEndSub属性值Form1Caption数据过滤Label1Caption输入数据:Label2Caption过滤后的数据:Text1Text----------------------------精品word文档值得下载值得拥有---------------------------------------------------------------------------------------------------------------------------------------------------------------------------:..----------------------------精品word文档值得下载值得拥有----------------------------------------------Text2Text3、下面的程序是用选择交换法将10个数排为升序(例如输入:1、20、7、35,输出1、7、20、35),请在(6)、(7)、(8)、(9)、(10)处将程序补充完整。mand1_Click()Dima(10)AsInteger排序前排序后1**********Fori=1To10a(i)=Val(InputBox("Enter"&i))Printa(i);NextiPrintFori=____(6)___k=iForj=____(7)______If_____(8)_____Then___(9)_____NextjIf___(10)__Thenb=a(i)a(i)=a(k)a(k)=bEndIfNextiFori=1To10Printa(i);NextiPrintEndSub----------------------------精品word文档值得下载值得拥有---------------------------------------------------------------------------------------------------------------------------------------------------------------------------