《13年410计算机试题》由会员分享，可在线阅读，更多相关《13年410计算机试题（11页珍藏版）》请在金锄头文库上搜索。
1、2013年内蒙古自治区高等职业学校招收中等职业学校毕业生统一考试（4.10）计算机类专业课综合试卷注意事项：1、本卷共12页，满分350分，考试时间150分钟。 2、答题前将密封线内的项目填写清楚。3、答题时请使用蓝、黑钢笔或圆珠笔。 题号一二三四五六总分分数第一部分 Visual Basic程序设计（共100分）得分评卷人 一、填空题(每空1分,共10分)1、可以在中断状态下查询对象的值的窗口是_。2、在VB中，发生在对象上且能被对象识别的动作称为_。3、VB中所有控件都具有的属性是_。4、表达式7 + 33 6 * 7 / 8 Mod 2的值是_。5、设a=2,b=3,c=4，则32*b
2、or a=c and bc的值为_。6、设有如下程序段：a$=”beijingshanghai”:b$=mid(a$,instr(a$,”g”)+6)执行上面的程序段后，变量b$的值为_。7、循环结构for I = 5.5 to 0 step -2的循环次数是_8、若将窗体form1隐藏起来，调用语句为_9、如果声明一个数组时没有指定下标的下界，则默认的下标值为_。10、在过程调用中，参数的传递可分为传值和传址两种方式。当实参为常量、表达式时，参数传递的方式为_。得分评卷人 二、单项选择题（每题只有一个答案是正确的，每题2分，共40分）1、以下叙述中错误的是（ ）A、打开一个工程文件时，系统自
3、动装入与该工程有关的窗体文件B、保存VB程序时，应分别保存窗体文件及工程文件C、VB应用程序只能以解释方式执行D、窗体文件包含此窗体及其控件的属性2、将数据和程序（ ）起来的一个逻辑实体称为“对象”A、连接B、封装C、串接D、调试3、决定文本框内显示内容的属性是（ ）A、text B、caption C、value D、enabled4、事件的名称必须是（ ）A、窗体所能识别的 B、能够被用户触发的 C、对象所能识别的 D、该事件有对应的方法可执行5、以下不符合VB语法的常量是（ ）A、2010B、”电脑”C、trueD、2.6E+016、在VB中，数据100&的类型是（ ）A、单精度型B、双
4、精度型C、整型 D、长整型7、设有语句：x=InputBox(输入数值，0，示例) 程序运行后，如果从键盘上输入数值10，并按回车键，则下列叙述中正确的是（ ）A、变量X的值是数值“示例”B、在InputBox对话框标题栏中显示的是示例C、0是默认值D、变量X的值是字符串108、下列属性中属于逻辑型的是（ ）A、Caption B、BorderStyle C、Visible D、Name9、窗体上有一个名为Label1的标签，为了使该标签透明并且没有边框，正确的属性设置为（ ）A、Label1.BackStyle=0： Label1.BorderStyle=0 B、Label1.BackSty
5、le=1： Label1.BorderStyle=1C、Label1.BackStyle=true： Label1.BorderStyle=trueD、Label1.BackStyle=False： Label1.BorderStyle=False10、设窗体上有一个文本框，名称为Text1，程序运行后，要求该文本框只能显示信息，不能接收输入的信息，以下能实现该操作的语句是（ ）A、Text1.MaxLength=0 B、Text1.Enabled=FalseC、Text1.Visible=False D、Text1.Width=011、命令按钮不支持的事件是（ ）A、Click B、DblC
6、lick C、GotFocus D、LostFocus12、命令按钮command1的事件过程如下：Private sub command1_click( )X=inputbox(“输入：”,”输入整数”)Msgbox “输入的数据是：”,”输入数据：”+XEnd sub 程序运行 后，单击command1，从键盘上输入数据10，则以下叙述中错误的是（ ）A、X的值是数值型数据10B、输入对话框的标题是“输入整数”C、信息框的标题是“输入数据：10”D、信息框中的显示是“输入的数据是：”13、运行以下程序段后，输出结果为X%=1/4Y%=11/4Print x%;y%A、0.25 0.75B、
7、1 3 C、0 2D、0 314、若变量X1，则执行语句if x then x=0 else x=1后，X的值是（ ）A、0B、1C、实时错误D、编译错误15、设a=2,b=3,c=4,d=5,下列表达式的值是 32*b OR a=c AND bc OR cd （ ）A、1 B、 True C、False D、-116、运行下面程序段时，若从键盘输入5，则变量Y的值是（ ）X=-5A=val(inputbox(“请输入A的值：”)Select case a Case is0Y=x+1Case is =0Y=x+2Case elseY=x+3End select A、5B、2C、4D、317、有
8、如下程序段X=2For I = 1 to 10 step 2X=x+iNext 运行程序后，X的值是（ ）A、26B、27C、38D、5718、已知X和Y是字符型变量，运行下面程序段后，变量Y的值是（ ）X=”ABCDEFG”For I =4 to 1 setp -1Y=y+mid(x,I,1)Next A、ABCDB、DCBAC、DEFGD、GFED19、以下程序段的输出结果是 x=1 y=4 Do Until y4 x=x*y y=y+1 Loop Print xA、1 B、4 C、8 D、2020、假定有以下两个过程：Sub S1(ByVal x As Integer,ByVal y A
9、s Integer) Dim t As Integer t=x：x=y：y=tEnd SubSub S2(x As Integer,y As Integer) Dim t As Integer t=x： x=y： y=tEnd Sub则以下说法中正确的是A、用过程S1可以实现交换两个变量的值的操作，S2不能实现B、用过程S2可以实现交换两个变量的值的操作，S1不能实现C、用过程S1和S2都可以实现交换两个变量的值的操作D、用过程S1和S2都不能实现交换两个变量的值的操作得分评卷人 三、程序填空题（每空2分，共50分）1、以下程序执行后将输出100到200之间所有的素数，并统计素数的个数 Pri
10、vate Sub Form_Click() Dim i%, j%, k%, t% t为统计素数的个数 Dim b As Boolean For i = 100 To 200 b = True k= _ j = Int(Sqr(i) Do While k = j And b If i Mod k = 0 Then _ End If _ Loop if b=true then t = t + 1 Form1.Print i End If Next i Print t=; t End Sub2、下面这段程序是从3个数中找出最小值Dim x%,y%,z%,min%X=val(inputbox(“请输入
11、X的值”)Y=val(inputbox(“请输入Y的值”)Z=val(inputbox(“请输入Z的值”)If _then Min=yElseMin=xEnd if If zmin then _Print “最小值是：”;min3、下列程序的功能是找出被5、7除，余数为1的最小5个正整数。 Private Sub Form_Click() Dim Ncount%, n% Ncount =_ n = 1 Do n = n + 1 If _ Then Print n Ncount = Ncount + 1 End If Loop Until _=5 End Sub4、本程序是一个比赛评分程序。在窗体上有text1（0）text1（6）文本框数组，显示最后得分的text2文本框和“计算得分”command1命令按钮。运行时在文本框数组中输入7个分数，单击“计算得分”命令按钮，则最后得分显示在text2 文本框中（去掉一个最
