VB练习题.doc

202一 单选。1. 表达式15Mod4+135*2的值是（C）A0 B.2 C.4 D.72.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1-Click() For I = 1 To 4 X = 4 For j = 1 To 3 X = 3For k = 1 To 2X = x + 6Next k Next jNext iPrint xEnd Sub程序运行后，单击令按钮，输出结果是（15）3.下列（A）属性可返回目录列表框的路径。A.path B. drive C.pathroad D.initdir4.下面关于随机文件的描述不正确的是（B）A.每条记录的长度必须相同B一个文件中记录号不必唯一C可通过编程对文件中的某条记录方便的修改D文件的组织结构比顺序文件复杂5.要使标签能够显示所需要的文本则在程序中应设置（A）属性的值。A.Caption B.Text C.Name D.AutoSize6下面程序输出的结果是（A）Private Sub Command1-Click()Dim a(1 To 3,4)As TntegerPrint LBound(a,1),UBound(a,2),UBound(a,2)End SubA.1 3 0 4 B.0 3 1 4 C.1 3 1 4 D.0 3 0 47.VisualBasic 的编程机制是（D）A可视化 B.面向对象 C.面向图形 D.事件驱动8.用户自定义数据类型时，其成员不能是（B）A定长字符串和数组 B.数组 C. 货币型和日期型 D.变长字符串和货币型9. 下列窗体的属性中，（A）属性决定窗体在启动时的显示状态 A.WindowsState B.ShowInTaskbar C.StartUpPosition D.Moveable10.如下程序：Private Sub Form-Click()A=20:b=20:c=120:d=120Form.Line(a,b)-（c,d）,BFEnd Sub单击窗体后，窗体上显示的是（C）A 一条直线 B。一个矩形空框 C。一个填充了颜色的矩形 D。无任何图形11.计算如下程序的运行结果（10 10）Private Sub Form-Click()a=10Print aCall pro(a)Print aEnd SubSub pro(ByVal a)a= 20End Sub12使用三个ScrollBar控件来分别表示RGB，其Value属性值不可能是（D）A128 B。245 C。254 D。25713语句Dim arr(-3 To 5,2 To 6)As Integer定义(数组元素有（A）A45个 B.40个 C。11个 D。54个14.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1-Click()A = Val(InputBox(“a=”)Print fun(A)End SubPrivate Function fun1(b)If b0 Then fun1 = 10ElseIfb=0 ThenFun1 = 9ElseFun1 = 8End IfEnd Function程序运行后，单击命令按钮，从键盘数据3，则窗体上显示的内容是（D）A3 B。8 C。9 D。1015在表示长整数时，可作为长整数尾部符号的是（C）A.# B.! C.& D.$16.Integer类型的数据由（B）字节组成 。A.1 B.2 C.3 D.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随机文件中每个记录的长度都是固定的COpen命令作用是打开一个已经存在的文件D使用Input#语句可以从随机文件中读取数据23.在窗体上画一个名称为Command1的命令按钮，然后编写下列事件过程：Option Base 1Private Sub Command1-Click（）K =3If x 3 Then Print x+3 If x 4 Then Print x+4If x 5 Then Print x+5If x arr22.Max Min HS1.Value+Text1.Te