VB复习题及参考答案

1、复习题及参考答案一、选择题(1) 使“microsoft”在当前窗口上输出的语句是（ b ）。a）picture.print “microsoft” b）print “microsoft”c）printer.print “microsoft” d）debug.print “microsoft” (2) 输入inputbox返回值的类型是（ a ） a）字符型 b）整型 c）浮点型 d）长整型(3)用来设置设置文本框有无滚动条的属性的值为（ a ）。 a)scrollbars b)multiline c)seltext d)sellength(4)int(rnd*50)+10表示的是（ d ）范

2、围内的整数。a)0，50 b)1，60 c)10，60 d)10，59(5)下列各控件不包含滚动条的是（ d ）。a)listbox b)combobox c)textboa d)labelbox(6)为了暂时关闭计时器，应把该计时器控件的（ c ）属性设置为false. a)visible b)timer c)enabled d)interval(7) 设置列表框选中的文本，用（ c ）属性。a）selected b）list c）text d）caption（8）未选中复选框控件时，value属性的值为（ c ）a）true b）false c）0 d）1(9) 某一vb工程含f1. f2

3、两个窗体，执行“f1show：f2hide”语句后，f1. f2窗体显示的结果为c。a) 都显示 b) 都不显示 c) 仅显示f1窗体 d) 仅显示f2窗体(10) 在窗体上画两个滚动条，名称分别为hscroll1、hscroll2；六个标签，名称分别为label1、label2、labe l3、label4、label5、label6，其中标签label 4 label6分别显示a、b、a*b等文字信息，标签label1、label2分别显示其右侧的滚动条的数值，label3 显示a*b的计算结果。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮计算时，对标签label1、lab

4、el2中显示的两个值求积，并将结果显示在label3中。以下不能实现上述功能的事件过程是 （ a ）。a）private sub command1_click() label3.caption = str(val(label1. caption )*val( label2.caption) end subb）private sub command1_click()label3.caption = hscroll1.value * hscroll2.valueend subc）private sub command1_click() label3.caption = val(label1. ca

5、ption )*val( label2.caption) end subd）private sub comma nd1_click() label3.caption = hscroll1.text * hscroll2.text end sub(11)当滚动条位于最左端或最上端时，valve属性被设置为（ a ）。a）min b）max c）min与max之间 d）min与max之外（12）在窗体中画一个名称为 timer1的计时器控件，要求每隔0.5s发生一次计时器事件，则以下正确的属性设置语句是（ d ）。a）erval=0.5 b）erval=5c

6、）erval=50 d）erval=500(13)若要退出for循环，可使用的语句为（ d ）。a) exit b) exit do c) time d) exit for(14)表达式样16/4-2.5*8/4 mod 52的值为（ d ）a) 14 b) 10 c) 20 d) 3（15）下面正确的赋值语句是（ c ）a) x+y=30 b) y= *r*r c) y=x+30 d) 3y=x(16) 可用于设置系统当前时间的语句是（ c ）。a)date b) date$ c) time d) timer(17) 表达式4+7 6 * 8 / 8

7、mod 9 的值是（ b ）。a) 4 b) 5 c) 6 d) 7 (18) 下列选项中不属于事件的是（ c ）。a）dblclick b)load c)show d)change(19) int(rnd*100)表示的是（ c ）范围内的整数。a)0，100 b)1，99 c)0，99 d)1，100(20) 为了某个命令按钮无效（显灰色），需要把该命令按钮的一个属性设置为false，这个属性是（ d ）。a) value b) default c) cancel d) enabled(21) 窗体fontsize属性缺省值为（ b ）。 a) 5 b) 9 c) 12 d) 16(22)

8、 由“for i=1 to 9 step -3”决定的循环结构被执行（ d ）次。“for i=10 to 9 step -3”决定的循环结构被执行（ ）次。“for i=1 to 9 step 3”决定的循环结构被执行（ ）次。a) 4 b)5 c) 6 d) 0(23) 设计动画时通常用定时器控件的（ a ）属性来控制动画速度。a) interval b)timer c) move d) enabled(24) 要使文本框显示滚动条，除了设置scrollbars属性外还必须设置（ b ）属性。a) autosize b)multiline c) alignment d) enabled(2

9、5) 在窗体(name属性为form1)上画两个文本框（其name属性分别为text1和text2）和一个命令按钮（name 属性为command1），然后编写如下两个事件过程：private sub command1_click()a=(text1.text)+(text2.text)print aend sub程序运行后，在第一个文本框（text1）和第二个文本框（text2）中分别输入123和321，然后单击命令按钮，则输出结果为（ c ）。a) 444 b) 321123 c) 123321 d) 132231(26) 下列可作为visual basic变量名的是（ d ）。a)a#a

10、 b)4a c)?xy d)consta(27) 列表框list1的（ b ）属性返回选取定的内容。a)list b)text c)captiob d)additem(28）用下面语句定义的数组的元素个数是（ c ）。dim a (3 to 20) as integera) 6b) 7c) 18d) 9 (29) 在vb中，画点的方法是（ c ）。a) lineb) shapec) psetd) circle(30) 决定一个控件在窗体的左右位置的属性是（ c ）。a) widthb) heightc) leftd) top(31) 当图片框的autosize 属性值为true时（ c ）。a

11、)图片大小随影像框的大小进行调整b)影像框的大小随图片大小进行调整c)图片框大小随图片的大小进行调整d)图片大小随图片框的大小进行调整(32) rgb函数中3个数字分别表示（ b ）。a)红、绿、白 b)红、绿、兰c)当前色、前景色、背景色d)红、黄、兰(33) 如果在立即窗口中执行以下操作：a=8 (是回车键，下同)b=9 print ab则输出结果是c 。 a) -1 b) 0 c) false d) true（34）fontsize属性用以设置字体大小，窗体的fontname属性缺省值为 a)5 b)9 c)12 d)16(35) 双精度变量占用( d )个字节。 a)1 b)2 c)4

12、 d)8(36)表达式9 mod 22+2的值是( b ) a)4 b)3 c)2 d)1(37)阅读下面的程序段：private sub form_click()a=2for i = 1 to 2 a = a *inext iend sub执行上面的循环后，a的值为( c ) a)2 b)3 c)4 d)8(38)int(rnd*10)表示的是 c 范围内的整数。 a)0,10 b)1,9 c)0,9 d)1,10(39)integer类型数据能够表示的最大整数为（ ） a)215 b)215 -1 c)216 d)216-1(40)输入对话框inputbox的返回值的类型是 a a)字符串

13、 b)整数 c)浮点数 d)长整数(41)由“for i=1 to 16 step 3”决定的循环结构被执行（ c ） 次 a)4 b)5 c)6 d)7(42)若i的初值为5，则下列循环语句的循环次数为 （ b ） 次。while i10i=i+2wend a)2 b)3 c)4 d)5(43)窗体的fontname属性的缺省值是( ) a)宋体 b)仿宋体 c)楷体 d)黑体(44)决定窗体标题内容的属性是( d ) a)text b)name c)alignment d)caption(45)将命令按钮设置command1为窗体的取消按钮，可修改该控件的 ( d ) 属性。a)enabl

14、ed b)value c)default d)cancel(46)将焦点主动设置到指定的控件或窗体上，应采用 ( b ) 方法。a)setdate b)setfocus c)settext d)getgata(47)将计时器的时间间隔设置为0.1 秒，则interval的属性值是( c )a)1 b)1000 c)100 d)10(48)决定标签内容显示对齐方式的属性是( c )a)text b)name c)alignment d)caption(49)若要在同一窗体中安排两组单选按钮，可用控件( b )予以分隔。a)文本框 b)框架 c)列表框 d)组合框(50)下列( a )语句不能用于

15、变量说明。a)dim b)public c)const d)private(51)设计动画时通常用定时器控件( a )属性来控制动画速度。a)interval b)timer c)move d)enabled(52)要想在文本框中显示滚动条，则应首先将( c )属性设置为true。a)maxlength b)multiline c)scrollbars d)change(53)设置文本框中能输入的字符为“*”，由下列 c 属性来反应。a)maxlength b)sellength c)passwordchar d)caption(54)如果将文本框的maxlength属性设置为0，则文本框中的

16、字符不能超过( c )。 a)8k b)16k c)32k d)64k(55)下列( b )属性用来表示标签或窗体的标题。a)text b)caption c)left d)name(56).选中复选框控件时，value属性的值为( d ) 。a)true b)false c)0 d)1(57).单击滚动条两端的任意一个滚动箭头，将触发该滚动条的( b ) 事件。a)keydown b)change c)scroll d)click二、填空题1请写出代数式5x2-3x2sin(a)/3的visual basic表达式 5*x2-3*x2*sin(a)/3 。2执行下面的程序段后，s的值为 9

17、。s = 5for i = 2.6 to 4.9 step 0.6s = s+1next i3如设置对象的属性是运行期设置，设置格式为 对象名.属性=属性值 。4表示x是5的倍数或是9的倍数的逻辑表达式是 x mod 5=0 or x mod 9=0 。6表达式ucase(mid(“abcdefghij”，3，4)的值是 cdef 。7新建工程时系统会自动将窗体标题设置为 form1 。8为了选择多个控件，可以按住 shift 键，然后单击每个控件。9下列语句段在运行时显示的结果是 5 .cls: x=10.38+8 : print len(x)10.下列程序功能是：当x100时，无意义。请在

18、空白处填入恰当的内容，将程序补充完整。 dim x as single x=inputboa(“请输入 x的值”) select case x case is 50y=0.8*xcase is=50,is15 and 85+2的输出结果为 true 。16执行下面的程序段后，b的值为 300 。a=300b=20a=a+bb=a-ba=a-b17以下程序段的输出结果是 1 2 3 。num=0do while num023.求a与b之积除以c的余数可用表达式是 。24.执行以下语句后，输出结果是 。 print chr$(65)25. 提供 函数用于将字符型转换成数值。表达式fix(-32.6

19、8)+int(-23.02)的值为 。chr(65)的值为 。26.工程文件的扩展名为 ，窗体文件的扩展名为 。27.表达式10+4*2 mod 6 85的值是： 。28.面向对象程序设计是一种以 为基础，由 驱动对象的编程技术。三、读程序写结果1在窗体上画一个命令按钮，然后编写如下事件过程：private sub command1_click()x=0do until x=-1a = inputbox(“请输入a的值”)a = val(a)b = inputbox(“请输入b的值”)b = val(b)x = inputbox(“请输入x的值”)x = val(x)a = a+b+xloop

20、print aend sub程序运行后，单击命令按钮，若准备依次在输入对话框中输入5、-1、6、8、20、-1，则输出结果为：272.在窗体(name属性为form1)上画两个文本框（其name属性分别为text1和text2）和一个命令按钮（name 属性为command1），然后编写如下两个事件过程：private sub command1_click()a=text1.text+text2.textprint “a=”;aend subprivate sub formm_load()text1.text=text2.text=end sub程序运行后，在第一个文本框（text1）和第二个

21、文本框（text2）中分别输入123和321，然后单击命令按钮，则输出结果为：a=1233213.在窗体上画一个 名称为command1的命令按钮，然后编写如下事件过程：private sub command1_click()for n = 1 to 20if n mod 3 0 then m = m + n 3next nprint “m=”,m end sub程序运行后，如果单击命令按钮，则窗体上显示的内容是:m= 424.在窗体上画一个命令按钮，然后编写如下事件过程：private sub command1_click()s=0dos=(s+1)*(s+2)number=number+1

22、loop until s=30print number，send sub程序运行后，如果单击命令按钮，则窗体上显示的内容是:3 1285. private sub form_click( )m=1n=2do while n=0s=s+aa=a-1loopprint “s=”;s, “a=”;aend sub结果为：s=15 a=-18.private sub command1_click()for i=1 to 4x=4for j =1 to 3x=x+3next jnext iprint xend sub结果为：139private sub command1_click()dim a(5,5) as byte,i as byte,j as bytefor i=1 to 5 for j=1 to 5a(i,j)=i*jnext jnext ifor i=1 to 5 print a(i,i);next iend sub结果为：1 4 9 16 2510.private sub command1_click()x=8.267y= int(x*10