内蒙古巴彦淖尔市临河区第三中学2018_2019学年高二信息技术下学期期末考试试题（计算机班）.docx

内蒙古巴彦淖尔市临河区第三中学2018-2019学年高二信息技术下学期期末考试试题（计算机班） 70分钟 *仅交答题纸，试卷学生自己保存好。一、 填空（16*1分） 1、在程序运行过程中可以改变数组元素个数的是（ ）数组，不可以改变数组元素个数的是（ ）数组。2、实参在形式上可以是常量、（ ）、（ ）3、重新定义动态数组若保留原有数组元素值时需有关键字（ ）4、控件数组中，各控件元素是（ ）类型的（填相同|不相同）5、FOR EACH后的变量必须是（ ）型的。6、数组的维数由（ ）的个数决定，数组的最小下标从1开始， 要在声明段中用( )说明.7、过程直接或间接的调用自己，这种调用被称为（ ）调用。8、CALL语句后的参数是（ ）参数。9、实际参数和形式参数存在（ ）对应、（ ）对应、（ ）对应。10、事件过程在调用通用过程时的参数传递有按（ ）传递和按（ ）传递两种方法。 二、选择（25*2分） 11、VB过程中的形式参数必须是（ ） A、常量 B、变量 C、表达式 D、常量、变量、表达式都可以 12、设有如下通用过程：Public Function f(x As Integer)Dim y As Integerx = 20y = 2f = x * yEnd Function在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()DIM x As Integerx = 10 y=5Z = f(x)Print x;ZEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）A、10 5 B、20 5 C、20 40 D、10 4013、设有如下通用过程：Public Sub Fun(a(), x As Integer)For i = 1 To 5x = x + a(i)NextEnd Sub在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下的事件过程：Private Sub Command1_Click()Dim arr(5) As VariantFor i = 1 To 5arr(i) = iNextn = 10Call Fun(arr(), n)Text1.Text = nEnd Sub程序运行后，单击命令按钮，则在文本框中显示的内容是（ ）A、10 B、15 C、25 D、2414、有如下通用过程和事件过程，运行程序后，单击窗体，程序的运行结果是（ ） public function ss(x as integer,y as integer) as integer if xy then ss=x-y else ss=y-x END FUNCTION PRIVATE SUB FORM CLICK( ) DIM A AS INTEGER ,B AS INTEGER A=8: B=6 PRINT SS(A,B) END SUB A、2 B、 -2 C、 8 8 D、6 615、下列程序的运行结果是（ ） PRIVATE SUB FORM CLICK( )STATIC B AS INTEGERDIM A AS INTEGER A=A+1B=B+1PRINT A,BEND SUB要求运行程序时单击窗体三次，给出第三次单击的结果A、3 3 B、1 3 C、3 1 D、1 1 16、S=0: M=0:N=0 FOR I=1 TO 20 IF I MOD 2=0 THEN S=S+1 ELSEIF I MOD 3 =0 THEN M=M+1 ELSEIF I MOD 5 =0 THEN N=N+1 END IFNEXT IPRINT S,M,N这段程序的执行结果是( ) A. 10 4 1 B. 10 3 1 C. 10 5 2 D. 10 3 317、在窗体上画一个命令按钮，其Name属性为Command1，然后编写如下代码： Option Base 1 Private Sub Command1_Click() Dim a(4,4) For i = 1 To 3 For j = 1 To 3 a(i,j)=(i-1)*3+j Next j Next i PRINT A（3，1） End Sub 程序运行后，单击命令按钮，其输出结果为:（ ） A、6 B、7 C、8 D、9 18、下列程序运行后的输出结果是 DIM A（6） AS INTEGER FOR I= 1 TO 5 A（I）= I NEXT I PRINT A（I） A、 0 B、 1 C、 5 D、显示出错信息19、语句A%=6.8执行后，变量A%的值是（ ）。A、6 B、7 C、6.8 D、7.020、执行下列程序后,变量X的值是( ) PRIVATE SUB FORM_CLICK( ) S=0 FOR A = 1 TO 5FOR B= 1 TO 3 S=S+1NEXT B NEXT A PRINT SEND SUBA. 70 B. 8 C. 25 D. 1521、设用复制、粘贴的方法建立一个命令按钮数组Command1，以下对该数组的说法错误的是: （ ） A、命令按钮的所有Caption属性都是Command1 B、在代码中访问任意一个命令按钮只需要使用名称Command1 C、命令按钮的大小都相同 D、命令按钮共享相同的事件过程 22、function abc( n as integer) as integer Abc=n*5+10 End functionPrivate sub form_click()Dim x as integerX=abc(2)+100* abc(1)Print xEnd sub A、 2 B 1520 c 1500 D 70023、创建通用过程时，选“工具”菜单中的“添加过程”命令时，发现该命令是灰色的，原因是 A、 未打开属性窗口 B、未打开代码窗口C、 此法不能创建通用过程 D、系统出错24、公有的函数过程PUBLIC后的关键字是 A、SUB B、 FUNCTION C、 FORM D、 子过程名25、下列调用子过程不正确的方法是 A、CALL FS（5） B、 FS 5 C、FS （5） 26、在窗体上画3个单选按钮，组成一个名为chkOption的控件数组。用于标识各个控件数组元素的参数是： （ ） A、Tag B、Index C、ListIndex D、Name 27.下列说法正确的是( ) A. 子过程可以嵌套调用 B. 子过程不可以嵌套调用C.子过程可以嵌套定义 D. 函数过程不可以递归调用28.下列说法正确的是( ) A. 通用过程必须有参数 B. 形式参数可以是表达式C. 实际参数可以是表达式 D. 子过程名可以返回值29. 在参数传递过程中，使用关键字（ ）来修饰形式参数，可以使之按值传递。A、ByVal B、ByRef C、Value D、Reference30定义局部静态变量，使用（ ）关键字。A、Dim B、Public C、Private D、Static31要想在过程调用后返回两个结果，下面的过程定义语句合法的是 。A、Sub p(Byval n,Byval m) B、Sub p(n,byval m)C、Sub p(n,m) D、Sub p(Byval n,m)32Sub过程与Function过程最根本的区别是 。A、Sub过程可以使用Call 语句或直接使用过程名调用，而Function过程不可以B、Function过程可以有参数，Sub过程不可以C、两种过程参数的传递方式不同D、Sub过程的过程名不能返回值，而Function过程能通过过程名返回值33. 在参数传递过程中，使用关键字（ ）来修饰形式参数，可以使之按址传递。A、ByVal B、ByRef C、Value D、Reference34、下列程序的功能是( )PRIVATE SUB FORMCLICK（ ）S=0 : M=0FOR A=1 TO 100IF A MOD 2 = 0 THEN S=S+AELSE M=M+1END IFNEXT APRINT S , MEND SUB A、统计1-100间的偶数和 B、统计1-100间的偶数个数 C、统计1-100间的偶数和,奇数个数。D、统计1-100间的偶数个数,奇数和. 35、如果将一个数据添加到列表框中，应用（ ）A、 LIST B、REMOVEITEM C、 ADDITEM D、 CLEAR三、程序填空（17*2分）36.求2+4+6+8+10+12+14+100 PRIVATE SUB FORM-CLICK（ ） DIM I AS INTEGER，S AS INTEGER FOR I= 2 TO 100 1 S=S+ 2 NEXT I PRINT S END SUB 37、输入20个数，按从大到小的顺序打印 PRIVATE SUB FORM-CLICK（ ） DIM I AS INTEGER ，A（20） AS SINGLE Dim J AS INTEGER FOR I= 1 TO 20 A（I）= VAL（INPUTBOX（“请输入数”） NEXT I FOR I= 1 TO 19 FOR J= 3 TO 20 IF 4 5 A（I）=A（J） A（J）=T END IF NEXT J PRINT A（I）； 6 PRINT A（I） END SUB 38、打印矩阵 0 1 1 1 1 0 1 1 1 1 0 1 1 1 1 0 PRIVATE SUB FORM-CLICK（ ） DIM A（4，4） AS INTEGER FOR I = 1 TO 4 FOR J= 1 TO 4 IF 7 A（I，J）=1 8 A（I，J）=0 END IF PRINT A（I，j）; 9 PRINT 10 END SUB 39、编写子程序对两个整数进行对调。 DIM A AS INTEGER，B AS INTEGER A=5：B=7 PRINT A，B CALL SS（A，B） 11 END SUB SS（X AS INTEGER，Y AS INTEGER） T=X 12 13 14 40、键盘输入两个数，然后输出大数。 DIM A AS INTEGER，B AS INTEGER A=5：B=7 MAX= 15 PRINT MAX END FUNCTION AA（X AS INTEGER，Y AS INTEGER）IF XY THEN 16ELSE 17END FUNCTION临河三中2018-2019学年第二学期高二年级期末考试计算机班VB试题答案 70分钟*仅交答题纸，试卷学生自己保存好。一、填空（16*1分）1、 动态 ， 静态 2、 变量 表达式3、Preserve4、相同5、变体6、数组下标 Option Base 17、递归调用8.实际参数9.个数 位置 类型