搜索
202一．单选。1.表达式15Mod4+13\5*2的值是（C）A．0B.2C.4D.72.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1-Click()ForI=1To4X=4Forj=1To3X=3Fork=1To2X=x+6NextkNextjNextiPrintxEndSub程序运行后，单击令按钮，输出结果是（15）3.下列（A）属性可返回目录列表框的路径。A.pathB.driveC.pathroadD.initdir4.下面关于随机文件的描述不正确的是（B）A.每条记录的长度必须相同B．一个文件中记录号不必唯一C．可通过编程对文件中的某条记录方便的修改D．文件的组织结构比顺序文件复杂5.要使标签能够显示所需要的文本则在程序中应设置（A）属性的值。A.CaptionB.TextC.NameD.AutoSize6．下面程序输出的结果是（A）PrivateSubCommand1-Click()Dima(1To3,4)AsTntegerPrintLBound(a,1),UBound(a,2),UBound(a,2)EndSubA.1304B.0314C.1314D.03047.VisualBasic的编程机制是（D）A．可视化B.面向对象C.面向图形D.事件驱动8.用户自定义数据类型时，其成员不能是（B）A．定长字符串和数组B.数组C.货币型和日期型D.变长字符串和货币型9.下列窗体的属性中，（A）属性决定窗体在启动时的显示状态A.WindowsStateB.ShowInTaskbarC.StartUpPositionD.Moveable10.如下程序：PrivateSubForm-Click()A=20:b=20:c=120:d=120Form.Line(a,b)-（c,d）,,BFEndSub单击窗体后，窗体上显示的是（C）A．一条直线B。一个矩形空框C。一个填充了颜色的矩形D。无任何图形11.计算如下程序的运行结果（1010）PrivateSubForm-Click()a=10PrintaCallpro(a)PrintaEndSubSubpro(ByVala)a=20EndSub12．使用三个ScrollBar控件来分别表示RGB，其Value属性值不可能是（D）A．128B。245C。254D。25713．语句Dimarr(-3To5,2To6)AsInteger定义(数组元素有（A）A．45个B.40个C。11个D。54个14.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1-Click()A=Val(InputBox(“a=”))Printfun(A)EndSubPrivateFunctionfun1(b)Ifb0Thenfun1=10ElseIfb=0ThenFun1=9ElseFun1=8EndIfEndFunction程序运行后，单击命令按钮，从键盘数据3，则窗体上显示的内容是（D）A．3B。8C。9D。1015．在表示长整数时，可作为长整数尾部符号的是（C）A.#B.!C.&D.$16.Integer类型的数据由（B）字节组成。A.1B.2C.3D.417.在用2通用对话框，控件建立“打开”或“保存”文件对话框时，如果需要指定文件列表框所列出的文件类型是文本文件（即.txt文件），则正确的描述格式是（A）A.text(.text)|(*.txt)B.文本文件（.txt）|(*.txt)C.text(.txt)FFFFF||(*.bct)D.text(txt)(*.text)18.设在菜单编辑器中定义了一个菜单项，名为menu1.为了在运行时隐藏该菜单项，应使用的语句是（D）A.memu1.Enable=TrueB.memu1.Enable=FalseC.memu1.Visible=TrueD.memu1.Visible=False19.用于获得字符串S从第四个字符开始的4个字符的函数是（A）A.Mid(S,4,4)B.Left(S,4,4)C.MidStr(S,4,4)D.MiddleStr(S,4,4)20.MSGBOX函数中有4个参数，其中必须写明的参数是（C）A指定对话框中显示按钮的数目B．设置对话框标题C．提示信息D．所有参数都是可选的21.通用过程可以通过执行“工具”菜单中的（A）命令来建立。A．添加过程B.通用过程C.添加窗体D.添加模块22.以下叙述中正确的是（B）A.一个记录中所包含的各个元素的数据类型必须相同B．随机文件中每个记录的长度都是固定的C．Open命令作用是打开一个已经存在的文件D．使用Input#语句可以从随机文件中读取数据23.在窗体上画一个名称为Command1的命令按钮，然后编写下列事件过程：OptionBase1PrivateSubCommand1-Click（）K=3Ifx3ThenPrintx+3Ifx4ThenPrintx+4Ifx5ThenPrintx+5Ifx6ThenPrintk+6PrintEndSub程序运行后，单击命令按钮，则窗体上显示的内容是（B）A．6789B。789C。89D。924.写出如下程序运行结果（D）Functionf(mAsInteger)AsIntegerb=1StaticcAsIntegerb=b+1c=c+1f=m*b*cEndFunctionPrivateSubCommand1-click()DimaAsIntegera=2sum=0ForI=1to3Sum=sum+f(a)Next1PrintsumEndSubA.12B.16C.20D.2425.下列有关控件数组与一般控件的区别的叙述中，最合理的是（A）A．控件数组一定由多个同类型的控件组成，一般控件只有一个控件。B．控件数组的Index为0，而一般控件的Index为空。C．控件数组的Index为1，而一般控件的Index为0。D．控件数组的建立通过Dim语句声明，而一般控件不必声明。26.以下叙述中错误的是（D）A．如果过程被定义为Static类型，则该过程中的局部变量都是Static类型B．Sub过程中不能被嵌套定义Sub过程。C．Sub过程中可以嵌套调用Sub过程D．事件过程可以像通用过程一样由用户定义过程名27.vb中的坐标系最小刻度为（A）A缇B象素C厘米D一个标准字符宽度28.（C）是由VisualBasic提供的一种专门的子程序，由对象本身所具有，反映该对象功能的内部函数或过程。A文件B属性C方法D窗体29.VB中的标识符不包括（D）A英文字母B数字C下划线D标点符号30.关于键盘事件的说法中，正确的是（D）A按下键盘任意键都会引发Keypress事件B．大键盘的“1”键，和数字键盘的“1”键的Keycode编码相同C．KeyDown和KeyUp事件过程中有KeyAsicii参数D．大键盘的4的上档符号是$，当同时按下shift键和大键盘的“4”时，Keypress事件过程KeyAsicii参数值是$的Assii值二．填空。1.LBoundUBoundarr22.MaxMinHS1.Value+Text1.Text3.5Text1（k）x4.Max=0Max=n-Min三．程序改错1.Forj=i+1To9Ifa(i)=a(j)Thena(j)-a12.n=kFori=2TonMID(S,i-1,1)=T