高三计算机专业VB试题(四).doc

高三年级计算机专业VB试题（四）一、填空题：1、 引用数组元素的方法是_。2、 在引用数组元素时，_、_、和_必须与声明数组时一致。3、 在Visual Basic中，过程分为_过程和_过程。4、 使用_声明在所有模块中都可以使用的过程；使用_声明只能在包含该声明的模块中使用的过程。5、 在使用Static关键字声明过程时表示在调用Sub过程之间_。6、 _语句可以使程序在一定条件下从一个Sub过程中退出，并且在Sub过程的任何位置都可以使用。7、 若要建立通用过程，打开代码编辑器窗口，从_列表框中选择_选项。8、 事件过程分为_过程和_过程；两者都使用_进行声明。9、 建立事件过程主要有三种方法：_、_、_。10、若要提前退出Function过程，可在Function过程内适当位置加入_语句。11、若要从Function过程返回一个值，可将这个值赋给_。12、声明过程时参数列表格式为：，OptionalByvalByRefParamArray变量名()As 数据类型名称。其中 Optional表示参数是可选的，ByVal表示_，ByRef表示_，ParamArray表示_，“（）”表示_，As子句用来_，多个参数时，参数之间用_进行分隔。13、在Visual Basic中，调用Sub过程有两种方式_和_。14、Visual Basic程序中的错误可分为_、_和_。三种类型。15、编译错误也称为_，这种错误是由于程序中的语句_而引起的。16、在程序出现“除数为零”会导致_错误。17、在Visual Basic中，使用_语句激活错误捕捉。18、_语句用于设置错误陷阱。19、窗体的Caption属性用于设置_。20、窗体的BackColor属性用于设置_。21、窗体的ForeColor属性用于设置_。22、窗体的FontName属性用于设置_。23、窗体的FontSize属性用于设置_。24、窗体的CurrentX属性用于设置_，窗体的CurrentY属性用于设置_。25、窗体的ScaleHeight属性用于返回_，窗体的Scalewidth属性用于返回_。26、窗体的Width和Height属性用于设置_。27、窗体的ScaleWidth属性与Width属性的区别是前者表示_，后者表示_。28、所有控件都具有的共同属性是_属性。29、控件和窗体的Name属性不能在_期间设置，只能通过_设置。30、窗体的KeyPreview属性是用来返回或设置一个值，以决定_，语法格式为_。二、选择题：20、 用print方法在Form1窗体中显示出4个#号的正确代码是（ ）A. Debug.print #B. Print #C. Form1_print #D. Form1.print #22、 print方法可以再（ ）对象上输出数据A. 桌面B. 标题栏C. 窗体D. 状态栏23、 代码窗口的注释行使用的符号标注是（ ）A. 单引号B. 双引号C. 斜线D. 星形号24、 如果A为整数且|A|=10，则显示OK,否则显示Error,表示这个条件的单行格式IF语句是（ ）A. if int(A) = A and sqr(A)=10 then printOK Else print ErrorB. if fix(A) = A and abs(A)=10 then printOK Else print ErrorC. if int(A) = A and (A=10,A=10 and A0 and a10 and a20 and a5,-1,0)后，x的值是（ ）A、5B、6C、0D、-127、 关于多行结构条件语句的执行过程，正确的说法是（ ）A. 各个条件所对应的语句块中，一定有一个语句块被执行B. 找到条件为True的第一个入口，便开始执行其后的所有语句块C. 若有多个条件为True，则他们所对应的语句块都被执行D. 多行选择结构中的语句块，有可能任何一个语句块都不被执行28、 在VB中，下列控制结构不能嵌套的是（ ）A. 选择控制结构B. 多分支控制结构C. For循环控制结构D. Do循环控制结构29、 窗体有一个命令按钮，命令按钮的单击事件如下：Private Sub Command1_Click()Dim aa = Array(1, 2, 3, 4, 5, 6, 7)For k = 2 To 5s = s + a(k)NextPrint sEnd Sub程序运行后，单击命令按钮，输出结果是（ ）A、10B、14C、18D、12030、 下列程序段的执行结果是（ ）Private Sub Form_Load()Dim a(3, 3)For m = 1 To 3For n = 1 To 3If n = m Or n = 3 - m + 1 Thena(m, n) = 0Elsea(m, n) = 1End IfNext nNext mFor m = 1 To 3For n = 1 To 3Print a(m, n),Next nPrintNext mEnd SubA、1 0 0 B、1 1 1 0 1 0 1 1 1 0 0 1 1 1 1C、0 0 0 D、0 1 0 0 0 0 1 0 1 0 0 0 0 1 031. 、下列Fornext语句的说法正确的是（ ）A. 循环变量、初值、终值和步长都必须为数值型B. Step后的步长只为正数C. 初值必须小于终值D. 初值必须大于中值32、 设计了如下程序，用于计算并输出7！（阶乘）：Private Sub Command1_Click()t = 0For k = 7 To 2 Step -1t = t * kNextPrint tEnd Sub 执行程序时，发现结果是错误的。下面的修改方案中能够得到正确结果的是（ ）A. 把t=0改为t=1B. 把for k =7 to2 strp -1改为for k=7 to 2 step 1C. 把for k=7to2 step -1改为for k=1 to7D. 把next改为next k33. 在窗体上画两个文本框Text1和Text2，一个命令按钮Command1，请阅读下程序段：Private Sub Command1_Click()x = 0Do Until x = 30x = (x + 2) * (x + 4)n = n + 1Looptext1.Text = Str(n)text2.Text = Str(x)End Sub运行程序后，单击命令按钮，在两个文本框中显示的值分别为（ ）A、1和0B、2和240C、2和120D、4和16834、 使用Redim preserve语句，可以（ ）A. 改变数组最后一维的大小B. 改变第一维的大小C. 改变数组所有维的大小D. 改变数组维数和所有维的大小35. 语句DimArr（-3 to 5) as integer 定义的数组的元素个数是（ ）A、6B、7C、8D、936、 语句DimArr（-3 to 5,-2 to 2)定义的数组的元素的个数是（ ）A、20B、12C、15D、2437、 设有数组定义语句：Dim（5） as integer，并设list1为列表框文件。下列给数组元素赋值的语句错误的是（ ）A. a（4）=3B. a(4)=inputbox(请输入一个数)C. a=(4)=list1.listindexD. a=array(1,2,3,4,5,6)38、 下列哪个声明的数组不是动态数组（ ）A. dim x( )B. Dim x(8)C. Redim x(8)D. Redim preserve x(8)39、 使用数组声明语句Dim Y（1 to12）as integer 后，以下说法正确的是（ ）A. Y数组中的所有元素均为0B. Y数组中的所有元素值不确定C. Y数组中的所有元素均为EmptyD. 运行EraseY后，Y数组中的所有元素值均为empty40、 用复制、粘贴的方法建立了一个命令按钮command1，以下说法错误的是（ ）A. 该控件数组的所有Caption属性均为command1B. 在代码中访问其中的命令按钮只需使用名称command1C. 该控件数组的大小相同D. 该命令按钮数组共享共同的事件过程三、判断题：1、使用Array函数给数组赋初值时，数组变量只能时Variant类型。（ ）2、把Erase语句用于定长数组时，不释放数组的所有空间，只是清除数组的内容。（ ）3、在Visual Basic中，所有的可执行代码都必须属于某个过程。（ ）4、Sub过程可以放在标准模块或窗体模块中，过程的定义时平行的，不能再过程中定义其他过程。（ ）5、过程中的语句块时完成特定任务编写的程序，可以没有一行，也可以没有许多行。（ ）6、因为程序代码中有If而无对应的End If或者括号不匹配等引起的错误时实时错误。（ ）7、在使用Visual Basic开发软件过程中，对于不可避免的错误或者还没有发现的错误，可以利用调试工具对程序的运行进行跟踪，找出并改成导致错误的语句。（ ）8、在使用Visual Basic开发软件过程中，对于已发现的错误，可以设置错误捕捉语句面，对错误进行抓获和处理。（ ）9、控件的所有属性值即可在设计阶段通过属性窗口进行设置，也可以通过代码来设置。（ ）10、在”窗体名.可以Keypreview = Boolean”语句中，Boolean为Ture时，窗体先接收键盘事件，然后时活动控件接收事件；Boolean为False时，则活动控件接收键盘事件，而窗体不接收。（ ）四、程序分析、下面程序的运行结果是什么？Dim x As IntegerDim i As Integerx = 100For i = 1 To 100 Step 5x = x - i / 6Next iPrint x、在窗体放置一个命令按钮command1，并编写下列单击事件的程序Option Base 1Private Sub Command1_Click()d = 0c = 6x = Array(1, 2, 3, 4, 5, 6, 7, 8, 9)For i = 1 To 6If x(i) c Thend = d + x(i)c = x(i)Elsed = d - cEnd IfNext iPrint dEnd Sub程序运行后，单击命令按钮，则在窗体上输出的内容是什么？、执行下列程序段后输出结果是什么？Private Sub Form_Load()n = 0For i = 1 To 20 Step 5n = n + 1Next iPrint nEnd Sub单击命令按钮，程序运行后，在文本框显式的值是什么？、在窗体有文本框text1和命令按钮command1，并有如下过程Private Sub Form_Load()Dim i As Integer, n As IntegerFor i