VB习题集(1)(1).doc

一、单项选择题1、以下说法错误的是_C_。A. Visual Basic是一种可视化编程工具 B. Visual Basic是结构化程序设计语言C. Visual Basic是面向过程的编程语言 D. Visual Basic采用事件驱动编程机制2、窗体和控件的描述及其属性的设置保存在_B_文件中。A. 工程 B. 窗体 C. 窗体二进制数据 D. 标准模块3、假定一个Visual Basic应用程序由一个窗体模块和一个标准模块构成。为了保存该应用程序，以下正确的操作是_B_。A. 只保存窗体模块文件 B. 分别保存窗体模块、标准模块和工程文件C. 只保存窗体模块和标准模块文件 D. 只保存工程文件4、以下叙述中错误的是_C_。 A在Visual Basic的窗体中，一个命令按钮是一个对象 B事件是能够被对象识别的状态变化或动作 C. 事件都是由用户的键盘操作或鼠标操作触发的D. 不同的对象可以具有相同的方法5、以下叙述中，错误的是_C_。A. 一个Visual Basic应用程序可以含有多个标准模块文件B. 一个Visual Basic工程可以含有多个窗体文件C. 标准模块文件可以属于某个指定的窗体文件 D. 标准模块文件的扩展名为.bas6、Visual Basic的窗体设计器主要是用来_A_。A. 建立用户界面 B. 添加图形、图像、数据等控件C. 编写程序源代码 D. 设计窗体的布局7、Visual Basic是一种结构化高级程序设计语言，它采用的是_C_驱动方式。A.键盘 B.鼠标 C.事件 D.函数8、Visual Basic是一种面向对象的程序设计语言，构成对象的三要素是_A_。 A.属性、事件、方法 B.控件、属性、事件 C.窗体、控件、过程 D.窗体、控件、模块9、Visual Basic主要用于_D_。 A.图像处理 B.文字处理 C.制作视频文件 D.开发应用程序10、相对于传统编程语言，Visual Basic最突出的特点是_D_。 A.可视化编程 B.面向对象的程序设计 C.结构化程序设计 D.事件驱动编程机制11、对象属性设置可在_B_中进行。 A.工具箱 B.属性窗口 C.工程资源管理器窗口 D.窗体设计窗口12、将窗体文件移出工程后，该文件_C_。 A.还存在于硬盘中 B.已从硬盘上删除 C.A和B都有可能 D.A和B都不可能13、不论什么对象，都具有_C_属性。 A.Text B.Forecolor C.Name D.Caption14、下面_A_是合法的变量名。 A. X_yx B.123abc C. integer D. X-Y15、为问题设计一个解决方案及具体解决步骤，属于_B_过程。 A.问题分析 B.算法设计 C.问题实现 D.归纳分析16、以下关于MsgBox的叙述中，错误的是_C_。 A. MsgBox函数返回一个整数 B. 通过MsgBox函数可以设置信息框中图标和按钮的类型 C. MsgBox函数的第一个参数是一个整数，该参数只能确定对话框中显示的按钮数量 D. MsgBox语句没有返回值17、Inputbox( )函数的返回值类型是_B_。 A.数值型 B.字符型 C.逻辑值 D.变体型18、下面的运算符中，优先级最高的是_A_。 A.Not B.And C.Or D.Lisk19、以下_B_是算术运算符。 A.Imp B.Mod C.Not D.Like20、函数Int(Rnd*100)是在_C_范围内的整数？ A.0,100 B.(1,100) C.0,99 D.(1,99)21、表达式Len(你好ABC52)的值是_C_。 A.9 B.8 C.7 D.622、表达式5 mod 3+35*2的值是_D_。 A.0 B.6 C.4 D.223、设a=2,b=3,c=4,d=5，表达式：ab and cc 的值是_B_。A. True B. False C. -1 D.124、下列可作为Visual Basic变量名的是_A_。A.Filename B.A(A+B) C. 254D D. Print25、VB中运算符的优先顺序是_A_。A. 算术运算符字符串运算符关系运算符逻辑运算符 B. 算术运算符关系运算符字符串运算符逻辑运算符C. 算术运算符逻辑运算符关系运算符字符串运算符D. 算术运算符关系运算符逻辑运算符字符串运算符26、表达式sgn(10 mod 6)& 20的值是_C_。 A. 1 B. 20 C. 120 D.2127、下列可以作为Visual Basic变量名的是_C_。A. Mod B. Cls C. counstA D. 2013-5-528、符号是声明_B_类型变量的类型定义符。 A. Single B. Integer C. string D. Variant29、表达式Int(-17.4)+sgn(17.4)的值是_B_。A. -18 B. -17 C. -16 D. 0 30、设x=4,y=8,z=7,表达式“xz)or zx”的值是_C_。A. -1 B.1 C. FALSE D. TRUE31、以下关系表达中，其值为False的是_D_。A.Thethey B.ABC0,1,iif(xy,x,y) B. if xy then max=x else max=y C. max=x if y=x then max=y D. if y=x then max=y max=x39、设有以下循环结构 A.若“条件”是一个为0的常数，则一次也不执行循环体 B.“条件”可以是关系表达式、逻辑表达式或常数 C.循环体中可以使用Exit Do语句 D.如果“条件”总是为True，则不停地执行循环体Do 循环体Loop While则以上叙述中错误的是_A_。40、下列关于DoLoop循环结构执行循环次数的描述正确的是_D_。A. Do WhileLoop循环和DoLoop Until循环至少都执行一次B. Do WhileLoop循环和DoLoop Until循环可能都不执行C. Do WhileLoop循环至少执行一次和DoLoop Until循环可能不执行D. Do WhileLoop循环可能不执行和DoLoop Until循环至少执行一次41、以下Case语句中错误的是_C_。A. Case 0 to 10 B. Case Is10C. Case Is10 and Is1042、为了给x,y,z这3个变量赋初值2，下面正确的是_A_。A. x=2:y=2:z=2 B. x=2；y=2；z=2C. x=2，y=2，z=2 D. x=y=z=243、Print方法可以在_B_对象上输出数据。 A. 桌面 B. 窗体 C. 状态栏 D. 标题栏44、下列描述不正确的是_D_。 A. 某个子过程中声明的局部变量，其使用范围仅限定于该子过程内B. 某个子过程中声明的局部变量，其生命周期仅限于该子过程被执行的过 程中C. 不同子过程中的局部变量可以具有相同的名称D不同子过程中具有相同的名称的局部变量是同一变量45、以下关于函数过程的叙述中错误的是_D_。A. 函数过程一定有返回值 B. 函数过程一定有参数C. 函数过程可以在窗体模块和标准模块中定义D. 函数过程参数的类型与返回值的类型无关46、有一子程序定义为Public Sub aaa(a As Integer,b As Single)，正确的调用形式是_C_。ACall aaa 1,1.2 B Call sub(1,1.2)Caaa 1,1.2 D. sub 1,1.247、用下面的语句所定义的数组的元素个数是_A_。 Dim b(-2 to 5,3 to 5)A. 24 B. 25 C. 11 D. 2148、根据需要用_A_可以重新确定动态数组的大小。 A.ReDim B.Dim C.Static D.Public49、用Redim不可以改变动态数组的_B_。 A. 大小 B. 类型 C. 维数 D. 下标值50、在过程定义中用_D_表示形参的按值传递。 A.Var B. ByRef C. ByValue D. ByVal51、下面数组声明语句中，数组包含元素个数为 _D_。 Dim a(-3 to 2,5） A.120 B.30 C.60 D.3652、有如下程序代码，输出结果是_A_。 Dim a() a=Array(1,2,3,4,5) for i=Lbound(a）to Ubound(a) print a(i); next iA. 1 2 3 4 5 B. 0 1 2 3 4 C. 5 4 3 2 1 D. 4 3 2 1 0 53、假定建立了一个名为Command1的命令按钮数组，则以下说法中错误的是_B_。 A. 数组中每个命令按钮的名称(名称属性)均为Command1 B. 数组中每个命令按钮的标题(Caption属性)都一样 C. 数组中所有命令按钮可以使用同一个事件过程 D. 用名称Command1(下标)可以访问数组中的每个命令按钮54、在设定Option Base 1后，经Dim arr(3,4）As Integer 定义的数组arr含有的元素个数为_A_。 A.12 B.20 C.19 D.955、有如下程序代码，输出结果是_C_。 Dim a(-3 to 6,5) n=Ubound(a,1) print nA. -3 B.0 C.6 D.556、窗体能响应的事件是_B_。A. ActiveForm B. Load C. Drive D. Change57、设置标签的_C_属性，可改变其文字对齐方式。A. Justify B. Visible C. Alignment D. 以上都不是58、可以控制连续发生的、有规律的事件的控件是_C_。A. 组合框 B. 列表框 C. 进度条 D. 时钟控件59、下列_D_不属于组合框的风格。A. 下列式组合框 B. 简单组合框 C. 下列式列表框 D. 简单列表框60、假定有一个菜单项，名为MenuItem，为了在运行时使该菜单项失效（变灰），应使用的语句为_A_。A. MenuItem.Enabled=False B. MenuItem.Enabled=TrueC. MenuItem.Visible=True D. MenuItem.Visible=False61、当运行程序时，系统自动执行启动窗体的某个事件过程，这个事件过程是_A_。A. Load B. Click C. Unload D. GotFocus62、复选框的Value 属性为 1时，表示_B_。A. 复选框未被选中 B. 复选框被选中C. 复选框呈灰色不可用 D. 复选框操作有误63、以下叙述中正确的是_A_。A. 窗体及窗体上所有控件的事件过程代码都保存在窗体文件中 B. 在工程中只有启动窗体可以建立菜单C. 窗体名称必须与窗体文件的名称相同D. 程序一定是从某个窗体开始执行的64、要改变Label控件中文字的颜色，可以设置Label控件的_C_属性。A FontColor B. FillColor C. ForeColor D. BackColor65、滚动条控件取值范围最大值的属性是_A_。A. MaxChange B. LargeChange C. Value D.Max-Min66、要获知当前列表项的数目，可通过_B_属性实现。 A.List B.ListCount C.ListIndex D.Text67、可以通过修改控件数组中的控件的_C_属性值改变其在数组中的顺序。 A.Font B.Caption C.Index D.Name68、用来设置斜体字的属性是 _B_。 A. FontBold B. FontItalic C. FontName D. FontSize69、复选框的Value 属性为 2时，表示 _C_。 A.复选框未被选中 B.复选框被选中 C.复选框呈灰色不可用 D.复选框操作有误70、下列控件中没有Caption属性的是 _B_。 A.框架 B.列表框 C.复选框 D.单选按钮71、滚动条产生Change事件是因为 _B_值改变了。 A.SmallChange B.Value C.Max D.LargeChange72、如果要每隔15s产生一个Timer事件，则Interval属性应设置为_D_。 A.15 B.900 C.150 D.1500073、列表框的 _C_属性是数组。 A.List 和 ListIndex B.List 和 ListCount C.List 和 Selected D.List 和 Sorted74、以下不允许用户在程序运行时输入文字的控件是_D_。 A.文本框 B.下拉式组合框 C.简单组合框 D.下拉式列表框75、_A_不是VB控件。 A. 窗体 B. 定时器 C. 单选框 D. 复选框76、要将窗体从内存中卸载出去，其实现的方法是_D_。 A. Show B. Hide C. Load D. UnLoad77、要使按钮上能放置图片需要修改按钮的_D_属性。 A. MaskColor B. BackColor C. Visible D. Style78、能清除文本框Text1中内容的语句是_B_。 A. Text= B. Text1.Text= C. Text1.Clear D. Text1.Cls79、设置标签Label1不可见的语句是_D_。 A. Label1.Visible=0 B. Label1.Visible=1 C. Label1.Visible=True D. Label1.Visible=False80、设置Line控件的_A_属性可使其呈现不同线型。 A. BorderStyle B. Style C. FillStyle D. Shape81、要使文本框的滚动条ScrollBars属性有效，首先要将_A_属性设置为True. A.MultiLine B.Visible C.Text D.MaxLength82、设置Image控件的_C_可使框内的图片按图像框大小自动调整。 A.AutoSize属性为True B.AutoSize属性为False C.Stretch属性为True D.Stretch属性为False83、命令按钮、单选按钮、复选框上都有Picture属性，可以在控件上显示图片，但需要通过_B_来控制。 A. Appearance属性 B.Style属性 C.DisablePicture属性 D.DownPicture属性84、如果要在菜单中添加一个分隔线，则应将其Caption属性设置为_D_。A= B* C. & D-85、下列不能打开菜单编辑器的操作是_D_。 A. 按Ctrl+E键 B. 单击工具栏中的“菜单编辑器”按钮 C. 执行“工具”菜单中的“菜单编辑器”命令 D按Shift+Alt+M键二、判断题1、 方法是预先定义好的、能够被对象识别的动作。（ 错 ）2、 工程资源管理器管理文件主要有6类，即窗体文件（.frm）、标准模块文件（.bas）、类模块文件（.cls）、工程文件（.vbp）、工程组文件（vbg）和资源文件（.res）。（ 对 ）3、 所有属性都可以在属性窗口设置。（ 错 ）4、 在Visual Basic设计界面中,工程窗口是不能隐藏的窗口。（ 错 ）5、 在语句中If x=1 Then y=1中，x=1为关系表达式，y=1为赋值语句。（ 对 ）6、 若要退出for循环，可使用Exit语句。（ 错 ）7、 在ForNext循环中，其中step步长可以是正数、负数或者零。（ 错 ）8、 文本框中显示的内容可根据文本框的大小自动换行。（ 错 ）9、 Dim a1,a2 as integer 语句声明变量a1和a2都为整型变量。（ 错 ）10、 VB中的变量必须先声明才可使用。（ 错 ）11、 在VB的工具箱中包括了所有的VB控件，我们不能再加载其他的控件。（ 错 ）12、 所有的控件在程序运行以后都是可见的。（ 错 ）13、 VB中有两种常量：直接常量和符号常量；两者的区别在于后者在程序运行过程中可以根据程序执行的要求改变该常量的值。（ 错 ）14、 在同一过程中声明数组时，数组名可以与变量名相同。（ 错 ）15、 PictureBox控件不是“容器”控件。（ 错 ）16、 菜单编辑器中的快捷键是指无须打开菜单就可以直接由键盘输入选择菜单项的键。（ 对 ）17、 在一个语句内写多条语句时，每个语句之间用：符号分隔。 （ 对 ）18、 若要取消窗体的最大化功能，可设置MaxButton属性为False来实现。（ 对 ）19、 面向对象程序设计是一种以对象为基础，由事件驱动对象执行的设计方法。（ 对 ）20、 窗体模块和标准模块都是只由代码组成。（ 错 ）21、 用户定义类型中的元素可以是任何数据类型，如变长字符串型，整型等。（ 对 ）22、 赋值语句的功能是计算表达式值并转换为相同类型数据后为变量或控件属性赋值。（ 对 ）23、 Do WhileLoop循环至少执行一次，Do Loop Until循环可能不执行。（ 错 ）24、 if 65 then x=5 endif是一条合法语句。（ 错 ）25、 给三个变体型变量x、y、z,分别对三个变量赋值：x=1、y=1、z=x=y，那么变量z的值也是1（ 对 ）26、 逻辑型数据只有两个值：0和1。 （ 错 ）27、 InputBox函数返回值的类型是数值或字符串。（ 错 ）28、 在VB中，运算 Then Than 的结果是True。（ 对 ）29、 在VB中，运算 ABCDE123A Like A*A 的结果是True。（ 对 ）30、 通用过程中使用Static关键字定义的过程级变量都是静态变量。（ 对 ）31、 由Array函数建立的数组必须是Variant类型。（ 对 ）32、 文本框和标签控件有许多共同特点，它们都能显示和输入文本。（ 错 ）33、 菜单一旦建成后，所有的菜单项均可识别Click事件。（ 错 ）34、 可以同时删除字符串前导和尾部空白的函数是Trim。（ 对 ）35、 一条赋值语句只能给一个变量赋值，不能给多个变量赋值。（ 对 ）36、 递归结构属于3种控制结构之一。（ 错 ）37、 VB中给对象的属性赋值可以通过赋值语句实现。（ 对 ）38、 在Select Case语句中，关键字Case后面的取值格式有3种。（ 对 ）39、 一个工程只能有一个窗体。（ 错 ）40、注释语句作为一个独立行，可放在过程、模块的开头作为标题，也可以放在执行语句的后面。（ 对 ）三、填空题1、 窗体上有一个命令按钮Command1，编写如下事件过程：Private Sub Command1_Click()x = InputBox(x=)y = InputBox(y=)Print x + yEnd Sub运行后，单击命令按钮，先后在两个输入对话框中输入123和321，窗体显示的内容是（ 123321 ）。2、 语句Form1.Print 10 & 20的输出结果为：（ 1020 ）。3、 执行下面程序，输出结果是（ 2 ）。 Private Sub Command1_Click() Dim aa As Variant aa=Array(1,2,3,4) Print aa(1) End Sub 4、 控件数组中以（ index ）属性来区分各个元素。5、 程序运行时单击第三个命令按扭，Label1的背景色是蓝色，请将下面代码补充完整。Private Sub Command1_Click(Index As Integer) Select Case Index Case 0 Label1.BackColor= VbRed Case 1 Label1.BackColor= VbGreen Case 2 Label1.BackColor=（ Vbblue ） End SelectEnd Sub 6、 执行下面程序，输出结果是n=（ 3 ），j=（ 42 ）。Dim j as integer,n as integer j=1：n=0Do While n3 j=j * (j+1) n=n+1LoopPrint n; j 7、执行以下程序段后，x和a的值分别为： （ 20 ） 、（ 10 ）。 Private Sub Command1_Click() Dim a As Integer, b As Integer a = 10: b = 10 Call mysub(a, b) Print aEnd SubPrivate Sub mysub(ByVal x As Integer, ByRef y As Integer) x = x * 2 y = y 2 Print xEnd Sub8、下面这段程序执行后是求199的平方的和，请将下面代码补充完整。 Private Sub Command1_Click() Dim x As Integer Dim sum As Double x = 1 Do While x = （ 99 ） sum = （ sum ） +x*x x = （ x+1 ） Loop Print sum End Sub9、下面程序段执行后，共执行了_3_次循环体，输出i的值是_4_。For i1 To 3 yi Next i Print i 10、下面这段程序执行后是求6的阶乘(6!)，请将下面程序补充完整。 f（ 1 ） For i1 To 6 f（ f ） * （ i ） Next i Print f;f 11、设在界面上放置了一个滚动条Hscroll1和一个标签控件Label1，要使每次单击滚动条两端箭头时，或单击滚动条滑块与两端箭头之间的空白区域时，标签内容能够反映滚动条的值，请将下面代码补充完整。 Private Sub Hscroll1.（ _Change（） ） Label1.Caption = Hscroll1.（ Value ） End Sub12、执行以下的循环后，i和m的值分别为： （ 4 ） 、（ 10 ） m=0 for i=1 to 3for j=1 to i m=m+jnext jnext i13、执行下面程序段后，x的值为：（ 24 ） n=5:x=1:i=1Do x=x*ii=i+1Loop While i z - x Then z = x + y If x + y z - y Then x = z + yPrint x, y, z以上程序段的执行结果分别是（ 14 ）、（ 3 ）、（ 11 ）16、Private Sub Command1_Click() Dim a, ba = 10b = 20Call mult(a), b)Print a, bEnd SubSub mult(ByRef x As Variant, y As Variant)x = x * 2y = y * 3End Sub以上程序的执行结果分别为（ 10 ）、（ 60 ）。17、有下列程序段： Dim a,b,ca=1:b=2:c=3a=b=cprint a程序运行