2011年最新vb期末复习题(有答案).doc

Visual Basic 复习题库一、单项选择题 1) 下列程序运行后，输出的结果为_。 B=1 Do while (b40) b=b*(b+1) Loop Print b a) 42 b) 39 c) 6 d) 1答案：A 2) 设执行以下程序段时依次输入1、3、5，执行结果为_。 Dim a(4) As Integer Dim b(4) As Integer For K =0 To 2 a(K+1) =Val(InputBox(“请输入数据：) b(3-K) =a(K+1) Next K Print b(K) a) 1 b) 3 c) 5 d) 0答案：A 3) 下列程序执行后，变量s的值为_。 Dim s As long ,x As Integer s=0:x=1 Do While (x5 x=x*y y=y+1loopprint x a) 2 b) 5 c) 10 d) 20答案：C 6) 当执行以下程序时，在名为lblResult的标签框内将显示_。 Private Sub cmdlt_click() Dim I,R R=0 For I=1 To 5 Step 1 R=R+I Next I lblResult.Caption=Str（R） End Sub a) 字符串15 b) 整数15 c) 字符串5 d) 整数5答案：A 7) 如下有一段不完整的程序段，如果要求该程序执行3次循环，则应在程序中的括号里输入_。 X=1 do x=x+3 print x loop until(_) a) x=8 b) x=7 d) x5 then if b3 then c=a*b else c=a mod b End if a) 2 b) -1 c) 1 d) 6答案：A 11) 下列程序的运行后s的值是_。 S=0 For x=99 to 1 Step-2 s=s+x Next x Print s a) 100 b) 500 c) 2500 d) 5000答案：C 12) 下列程序的执行结果是_。 K=0 For I=1 To 3 a=IIK print a; Next I a) 1 1 1 b) 1 2 3 c) 0 0 0 d) 1 4 9答案：A 13) 下列程序的执行结果是_。Dim a(5) As StringDim b As IntegerDim I As IntegerFor I =0 To 5 a(I)=I+1 Print a(I)Next I a) 123456 b) 6 c) 654321 d) 0答案：A 14) 下列程序的执行结果为_。 Dim intsum As Integer Dim I As Integer intsum=0 For I=20.2 To 5 Step -4.7 intsum=intsum +I Next I Print intsum a) 150 b) 200 c) 50 d) 0答案：C 15) 下列程序的执行结果为_。Dim S As Integer,n As Integer S=0:n=1 Do While nb Then a=a-b Else b=b+a End if Print a a) 50 b) 100 c) 200 d) 10答案：A 17) 下列程序的执行结果为_。 Dim intsum As Integer Dim I As Integer intsum=0 For I=0 To 50 Step 10 intsum=intsum+I Next I Print intsum a) 150 b) 200 c) 50 d) 0答案：A 18) 下面程序执行后，X的结果为_。 X=0 For I =1 to 5 For j=I to 5 X=X+1 Next j Next I Print X a) 5 b) 10 c) 15 d) 20答案：C 19) 下面程序执行的结果是_。 Private Sub Form_Click() A$=123:B$=456 C=Val(A$)+Val(B$) Print C100 End Sub a) 123 b) 3 c) 5 d) 579答案：C 21) 下面程序段的循环结构执行后， 的输出值是_。程序段为： For I=1 to 10 step 2 y=y+I Next I print I; a) 25 b) 10 c) 11 d) 因为Y的初值不知道，所以不确定答案：C 22) 写列程序段的执行结果_。 A=abbacddcba for I=6 to 2 step -2 x=mid(a,I,I) y=left(a,I) z=right(a,I) z=x & y & z next I print Ucase(z) a) ABA b) AABAAB c) BBABBA d) ABBABA答案：C 24) 有如下程序：For I=1 To 3 For j=5 To 1 Step-1 Print I+jNext j,I其循环执行的次数为_。 a) 12 b) 13 c) 14 d) 15答案：D 25) 有如下程序段，该程序执行后，变量a的值为_。 For I=1 To 2 For J=I To 2 For K=1 To J a=a+2 Next K Next J Next I a) 2 b) 8 c) 10 d) 20答案：C 26) 执行下列程序后，变量a的值为_。 Dim I as integer dim a as integer a=0 for I=0 to 100 step 2 a=a+1 next I a) 1 b) 10 c) 51 d) 100答案：C 27) 执行下列程序后，X的值为_。 X=3 y=6 Do While y=6 x=x*y y=y+1 Loop a) 3 b) 6 c) 18 d) 20答案：C 28) 执行下列程序段后，整型变量c的值为_。A=24b=328select case b10 case 0 c=a*10+b case 1 to 9 c=a*100+b case 10 to 99 c=a*1000+bend select a) 537 b) 2427 c) 24328 d) 240328答案：C 29) 执行完下面的程序段后，循环将执行_次。 For I=1.7 To 5.9 Step 0.9 a=a+1 Print a Next I a) 3 b) 4 c) 5 d) 6答案：C 30) 有如下语句，执行后该段语句的循环次数是_。 Dim s,I,j as integer For I =1 to 3 For j=3 To 1 Step-1 S=I*j Next j Next I a) 9 b) 10 c) 3 d) 4答案：A 32) 有如下程序段，该程序段执行完毕后，共循环了_。 For I=1 To 5 For j=1 To I For k=j To 4 Print a Next k Next j Next I a) 4 b) 5 c) 38 d) 40答案：D 33) 有如下程序，该程序的运行结果为_。 Dim k As Integer n=5:m=1:k=1 Do While k=n m=m*2 k=k+1 Loop Print m a) 1 b) 5 c) 32 d) 40答案：C 34) 以下程序输出1到1000之间所有的偶数之和，请补充完该程序。 Private Sub Command_Click() Dim x As Double For I=0 To 1000 If _ Then x=x+I End If Next I Print x End Sub a) i Mod 2 = 0 b) x Mod 2 = 0 c) I Mod 2 0 d) x Mod 2 0答案：A 35) 以下是计算10的阶乘的程序，请补充该程序。 Dim t as single Dim k as Integer k=0:t=1 While_ k=k+1 t=t*k Wend Print t a) k10 c) k=10 d) k=10答案：A 45) 表达式2*32+2*8/4+32的值为_。 a) 64 b) 31 c) 49 d) 22答案：B 51) _控件可以使用SetFocus()方法。 a) Frame b) Label c) TextBox d) Timer答案：C 52) 滚动条单击边上的箭头按钮移动的大小由_设定。 a) Change b) SmallChange c) Scroll d) Tabstop答案：B 53) 下列程序段的执行结果为_。 N=0:J=1 Do Until N2 N=N+1 J=J+N*(N+1) Loop Print N;J a) 0 1 b) 3 7 c) 3 21 d) 3 13答案：C 54) 下列程序段的执行结果为_。X=6For K=1 To 10 Step -2 X=X+KNext K Print K;X a) -1 6 b) -1 16 c) 1 6 d) 11 31答案：C 55) 下列程序段的执行结果为_。K=0For J=1 to 2 For I = 1 to 3 K =I+1 Next I For I = 1 to 7 K = K+1 Next INext JPrint K a) 10 b) 6 c) 11 d) 16答案：C 56) 下列程序段的执行结果为_。 M=0 For I=1 To 3 For J =5 To 1 Step-1 N = N+1 Next J,I Print N;J;I a) 12 0 4 b) 15 0 4 c) 12 3 1 d) 15 3 1答案：B 57) 下列程序段运行后，输出结果是_。 B=1 Do until b7 b=b*(b+1) Loop Print b a) 7 b) 39 c) 42 d) 1答案：C 58) 下列程序共执行了_循环。 Dim intsum As Integer Dim I As Integer Dim j As Integer For I=1 To 10 Step 2 For j=1 To 5 Step 2 intsum=intsum+j Next j Next I a) 10 b) 20 c) 25 d) 15答案：D 59) x是小于100的非负数，用vb表达式正确的是_。 a) 0 b) 0=x=0 AND x100 d) 0=x OR x100答案：C 60) 15.52的结果是_。 a) 1 b) 1.5 c) 7 d) 8答案：D 61) 19.5 Mod 2*2的运算结果是_。 a) 3.5 b) 1 c) 3 d) 0答案：D 63) a和b中有且只有一个为0，可以用以下表达式来表示_。 a) a=0 or b=0 b) a=0 Xor b=0 c) a*b=0 And a+b0 d) a=0 And b=0答案：B 67) dim a(-3 to 3)所定义的数组元素个数是_。 a) 6 b) 7 c) 8 d) 9答案：B 70) Inputbox()函数的返回值类型为_。 a) 数值型 b) 字符型 c) 逻辑型 d) 变体型答案：B 71) Inputbox函数的参数中，必选参数Prompt的作用是_。 a) 输出信息 b) 定义提示信息 c) 定义隐含信息 d) 定义输入的位置答案：B 72) Rnd函数不可能产生的值是_。 a) 0 b) 1 c) 0.1234 d) 0.00005答案：B 73) Visual Basic 是一种面向对象的程序设计语言，构成对象的三要素是_。 a) 属性、事件、方法 b) 控件、属性、事件 c) 窗体、控件、过程 d) 窗体、控件、模块答案：A 74) 变量A%的类型是_。 a) Integer b) Single c) String d) Boolean答案：A 75) 表达式X+1X是_。 a) 算术表达式 b) 非法表达式 c) 字符串表达式 d) 关系表达式答案：D 76) 不能作为容器的对象是_。 a) 窗体 b) 框架 c) 图片框 d) 图像框答案：D 78) 窗体模块保存在一个扩展名为_的文件中。 a) bas b) cls c) frm d) bmp答案：C 79) 如有数组声明语句Dim a(2,-3 to 2,4)，则数组a包含元素的个数是_。 a) 40 b) 75 c) 12 d) 90答案：D 80) 若x是一个正实数，对x的第3位小数四舍五入的表达式是_。 a) 0.01*Int(x+0.005) b) 0.001*Int(1000*(x+0.005) c) 0.01*Int(100*(x+0.05) d) 0.01*Int(x+0.05)答案：B 82) 能显示窗体的方法是_。 a) Visible b) show c) Hide d) open答案：B 86) 把 InputBox 的返回值转换为数值应该使用的函数是_。 a) Log b) Str c) Len d) Val答案：D 87) 为使计时器控件每隔5秒钟产生一个计时器事件(timer 事件)，则应将其Interval属性值设置为_。 a) 5 b) 500 c) 300 d) 5000答案：D 89) 如果要求设置定时器时间间隔为0.5秒钟，那么它的Interval属性值应该等于_。 a) 5000 b) 500 c) 50 d) 5答案：B 90) 如果要改变窗体的标题,需要设置窗体对象的_属性。 a) Name b) Caption c) BackColor d) BorderStyle答案：B 91) 如果要在文本框中输入字符时，只显示某个字符，如星号（*），应设置文本框的_属性。 a) Caption b) PasswordChar c) Text d) Char答案：B 92) 如果有数组声明 Dim a(10) As Integer，则该数组共有_个元素。 a) 10 b) 11 c) 9 d) 不确定答案：B 93) 若要将窗体从内存中卸载出去，应该使用的方法是_。 a) Show b) UnLoad c) Load d) Hide答案：B 94) 若要设置定时器控件的定时时间，需设置的属性是_。 a) interval b) value c) enabled d) text答案：A 95) 若要在图片框中绘制一个圆，使用的方法是_。 a) Circle b) line c) point d) pset答案：A 96) 删除字符串前导和尾随空格的函数是_。 a) Ltrim() b) Rtrim() c) Trim() d) Lcase()答案：C 98) 设置命令按钮的标题文字时，应改变的属性是_。 a) text b) Name c) Caption d) （名称）答案：C 99) Visual basic采用了_编程机制。 a) 面向过程 b) 面向对象 c) 事件驱动 d) 可视化答案：C 100) Msgbox 函数返回值的类型是_。 a) 数值 b) 字符串 c) 变体 d) 数值或字符串(视输入情况而定)答案：A102) 当某一按钮的（ ）属性设置为False时，该按钮不可见。 a) Enable b) Visibale c) Default d) Cancel答案：B 105) 工程文件的文件名后缀是_。 a) .bmp b) .vbp c) .frm d) .bas答案：B 107) 函数int(abs(99-100)/2)的值为_。 a) 1 b) 0 c) “0” d) “1”答案：B 108) 函数left(Hello, 2)的值为_。 a) He b) el c) lo d) true答案：A 109) 将当前窗体中显示的文字及绘制的图形全部清除，可以用方法_。 a) Me.Clear b) Me.Cls c) Me= d) Me.Delete答案：B 115) 数学式子sin25写成Visual Basic表达式是_。 a) sin25 b) Sin(25) c) Sin(25*3.14/180) d) sin(25)答案：C 117) 设定文本框中是否可以接受多行文本用_属性。 a) MaxLength b) ToolTipText c) Multiline d) Tag答案：C 119) _关键字声明的局部变量在整个程序运行中一直存在。 a) Static b) Private c) Dim d) Public答案：A 121) Visual Basic应用程序的运行模式是_。 a) 解释运行模式 b) 编译运行模式 c) 既有解释运行模式，又有编译运行模式 d) 汇编运行模式答案：C 122) 当窗体大小改变时，要使其中的控件也按比例发生变化，应使用窗体的_。 a) AutoSize属性 b) Resize事件 c) AutoRedraw属性 d) Stretch方法答案：B 126) 菜单控件仅支持以下_事件。 a) Click b) MouseDown c) KeyPress d) Load答案：A 127) 若要获得滚动条的当前值，可访问的属性是_。 a) Text b) Value c) Max d) Min答案：B 128) 若要将某命令按钮设置为默认命令按钮。则应设置为True的属性是_。 a) Value b) Cancel c) Default d) Enabled答案：C 129) 双击窗体中的对象后，Visual Basic将显示的窗口是_。 a) 项目（工程）窗口 b) 工具箱 c) 代码窗口 d) 属性窗口答案：C 130) 为使文本框显示滚动条，必须先设置文本框的属性是_。 a) AutoSize b) Alignment c) Multiline d) ScrollBars答案：C 131) 下列字符串不能作为VB的变量名是_。 a) ABCDEFG b) P000000 c) 89TWDDFF d) XYZ答案：C 133) 下列各组控件都具有Caption属性的是_。 a) 窗体、文本框 b) 标签、定时器 c) 窗体、标签 d) 文本框、定时器答案：C 134) 下列各赋值语句，语法不正确的是_。 a) x+y=5 b) iNumber=15 c) Labell.caption=time d) sLength=x+y答案：A 136) 下列变量名中不合法的是_。 a) strname b) 3abc c) A_one d) vaone答案：B 137) 下拉式组合框的Style属性值为_。 a) 0 b) 1 c) 2 d) 3答案：A 141) 以下不是Visual Basic特点的选项是_。 a) 可视编程 b) 算法设计 c) 事件驱动 d) 面向对象答案：B 142) 以下不具有Picture属性的对象是_。 a) 窗体 b) 图片框 c) 图像框 d) 文本框答案：D 143) 以下_控件不能触发Dbclick()事件。 a) Label b) Commandbutton c) PictureBox d) Image答案：B 145) 要使循环体至少执行一次，应使用_循环。 a) For-next b) While-wend c) Do-Loop while|until d) dowhile|until-loop答案：C 146) 要禁用计时器控件、需要将_属性设置为false。 a) Enable b) Visibale c) Timer d) Interval答案：A 150) 写在一行上的多条语句，应以_为分隔符。 a) 分号 b) 逗号 c) 冒号 d) 空格答案：C 153) 若要使某命令按钮获得控制焦点，可使用的方法是_。 a) lostfocus b) setfocus c) point d) value答案：B 154) 设a=2,b=3,c=4,d=5,下列表达式a=bc=d的值是_。 a) 1 b) Ture c) False d) -1答案：C 155) 逻辑表达式NotabAnd 93的值为_。 a) True b) False c) 表达式有错 d) 条件不足答案：A 160) 下列可以把当前目录下的图形文件picl.jpg装入图片框Picture1中的语句为_。 a) Picture=pic1.jpg b) Picture.Handle=pic1.jpg c) Picture1.Picture=LoadPicture(pic1.jpg) d) Picture:LoadPicture(pic1.jpg)答案：C 161) 下列哪一个是正确的变量名_。 a) $abc b) Int c) 141abc d) abcf答案：D 163) 下列能正确产生1-30之间的随机整数的表达式是_。 a) 1+rnd(30) b) 1+30*rnd() c) rnd(1+30) d) int(rnd()*30)+1答案：D 166) 以下VB中对象属性的一项是_。 a) Click b) Name c) Caption d) Top答案：A 167) 假定Picture1和Text1分别为图片框和文本框的名称，下列不正确的语句是_。 a) Print 25 b) Picture1.Print 25 c) Text1.Print 25 d) Debug.Print 25答案：C 168) 将命令按钮Command1设置为不可见，应修改该命令按钮的_属性。 a) Visible b) Value c) Caption d) Enabled答案：A 169) 下列表达式中，_的值为False。 a) BCD b) 1234512345 & ABC c) Not 2*5=10 d) 4=4 and 52+2答案：C 170) 下列的程序段执行后，X的值为_。 X=0 for I=1 to 10 for j=I to 10 x=x+1 next j next I a) 50 b) 55 c) 100 d) 105答案：B 171) 下面的运算符中，哪个是关系运算符_。 a) Not b) mod c) d) &答案：C 173) 下面的运算符中，哪个是逻辑运算符_。 a) And b) Mod c) = d) &答案：A 175) 写列程序段的执行结果为_。 X=5 y=-20 if not x0 then x=y-3 else y=x+3 print x-y;y-x end if a) -3 3 b) 5 -8 c) 3 -3 d) 25 -25答案：A 176) 循环结构for i=1 to 10 step 1.5的执行次数是_。 a) 6 b) 7 c) 9 d) 10答案：B 179) 在Visual Basic中，要设置菜单项的快捷访问键，应使用哪个符号：_。 a) & b) * c) $ d) 答案：A 180) 在Visual Basic中，下列_控件可以包含其他控件。 a) Picturebox b) Commandbutton c) Label d) Checkbox答案：A 182) 在Visual Basic 中，称对象的数据为：_。 a) 属性 b) 方法 c) 事件 d) 封装答案：A 183) 在VB中，常量12#的数据类型是_。 a) 整型 b) 双精度浮点型 c) 长整型 d) 字符串答案：B 185) 语句Print 5*5/5的输出结果是_。 a) 5 b) 25 c) 0 d) 5*5/5答案：A 186) 用于设定文本框中最多可接受的字符数的属性是_。 a) AutoSize属性 b) PasswordChar属性 c) SelLength属性 d) MaxLength属性答案：D 187) 用于获取字符串长度的函数是_。 a) Len() b) Length() c) Strlen() d) Lofo()答案：A 188) 用于获得字符串S从第4各字符开始的4个字符的函数是_。 a) Mid(S,4,4) b) Middle(S,4,4) c) Midstr(S,4,4) d) MiddleStr(S,4,4)答案：A 189) 用于获得字符串S最左边4个字符的函数是：_。 a) Left(S,4) b) Left(1,4) c) Leftstr(S) d) Leftstr(3,4)答案：A 190) 用以下语句 Dim b(-2 to 4)as string 所定义的数组的元素个数是_个。 a) 2 b) 4 c) 6 d) 7答案：D 191) 用于将菜单项级别提升一级的按钮为_。 a) b) c) d) 答案：A 192) 用户可通过_模拟屏幕的小图象来布置应用程序运行后的位置。 a) 窗体设计器 b) 快捷菜单 c) 立即窗口 d) 窗体布局窗口答案：D 193) 以下选项中，是Visual Basic控件的是_。 a) 文本框 b) Print c) Click d) Debug答案：A 194) 以下选项中，不属于单选按扭属性的是_。 a) Enabled b) Caption c) Name d) Min答案：D 196) 单精度浮点数占用的字节数为_。 a) 2个字节 b) 3个字节 c) 4个字节 d) 8个字节答案：C 197) 当一个工程含有多个窗体时，其中的启动窗体是_。 a) 启动VB时建立的窗体 b) 第一个添加的窗体 c) 最后一个添加的窗体 d) 在“工程属性”对话框中指定的窗体答案：D 198) 对象是一个逻辑实体，它是_的集合。 a) 数据 b) 代码 c) 数据与代码 d) 属性答案：C 199) 改变驱动器列表框的Drive属性值将激活_事件。 a) Change b) Scroll c) KeyDown d) KeyUp答案：A 200) 将定时器的时间间隔设置为1秒，那么定时器的Interval属性应设置为_。 a) 1000 b) 1 c) 100 d) 10答案：A 202) 不能触发滚动条Change事件的操作是_。 a) 拖动滚动块 b) 单击两端箭头 c) 单击滚动块 d) 单击箭头与滚动块之间的滚动条答案：C 204) 当程序运行时，在窗体上单击鼠标，以下_事件是窗体不会接收到的。 a) MouseDown b) MouseUp c) Load d) Click答案：C 206) 数组Dim D(3, 1 To 10, 1 To 15)共有元素_。 a) 100 b) 600 c) 30 d) 450答案：B 208) 单击滚动条两端的滚动箭头，将触发它的_事件。 a) Scroll b) SmallChange or LangeChange c) KeyDown d) Change答案：D 209) 程序的基本控制结构是_。 a) 顺序结构、多分支结构和单分支结构 b) ForNext结构、Doloop结构 c) 顺序结构、选择结构和循环结构 d) 单行结构和多行结构答案：C 210) 下列_语句可以将变量A、B的值互换。 a) A=B:B=A b) A=A+B:B=A-B:A=A-B c) A=C:C=B:C=A d) A=(A+B)/2:B=(A-B)/2答案：B 211) 下列_语句可以将变量A、B的值互换。 a) A=B:B=A b) C=A:A=B:B=C c) A=C:C=B:C=A d) B=A:A=B答案：B 212) 以下程序段执行后整型变量n 的值为_。 N=0 for I=1 to 20 step 5 n=n+1 next I a) 3 b) 4 c) 5 d) 2答案：B 213) 以下程序输出的结果为_。 X=1 y=4 Do Until y4 x=x*y y=y+1 Loop Print x a) 4 b) 8 c) 12 d) 16答案：A 215) 以下哪个是合法的变量名_。 a) Len b) Testqw c) 6cost_1 d) count2s答案：D 216) 以下可以构成语句的一项是_。 a) 对象名.属性名 b) 对象名.方法名 c) 对象名.事件名 d) 对象名.函数名答案：B 217) 以下程序段的执行结果是_。 X=2:y=1 If x*y0 End If a) Ture b) False c) -1 d) 1答案：B 218) 以下程序段的输出结果是_。 A=Sqr(3) b=Sqr(2) c=ab Print c a) -1 b) 0 c) False d) Ture答案：D 220) 下列程序运行后，变量s的值为_。 J=0:s=0 For I=1 To 4 j=j+I s=s+j Next I a) 20 b) 10 c) 5 d) 15答案：A 221) 下列程序段的执行结果为_。 Dim M(10),N(10) I=3 for T=1 To 5 M(T)=T N(I)=2*I+T Next T print N(I);M(I) a) 3 11 b) 3 15 c) 11 3 d) 15 3答案：C 222) 下列程序段的执行结果是_。 N=10 For k=n To 1 Step-1 x=Sqr(k) x=x-2 Next k Print x-2 a) -3 b) -1 c) 1 d) 1.16答案：A 223) 如下数组声明语句，正确的是_。 a) dim a3,4 as intiger b) dim a(3,4) as