VB复习资料xs.docx

1、VB复习资料xs第一章书本习题一、选择题1. Visual Basic采用( A )的编程方法。A. 面向对象 B. 面向过程 C. 面向问题 D. 面向用户2Visual Basic集成开发环境有3种工作状态，下面选项中不属于3种工作状态的是( B )A. 设计状态 B. 编写代码状态 C. 运行状态 D.中断状态3. 工程文件的扩展名是( A )。A. . vbp B. .bas C. . frm D. . vpj4为了保存一个Visual Basic应用程序，下列说法正确的是( D )。A. 只保存窗体文件（frm)B. 分别保存工程文件和标准模块文件（bas)C. 只保存工程文件（vb

2、p)D. 分别保存工程文件、窗体文件和标准模块文件二、填空题1Visual Basic窗体设计器的主要功能是 设计窗体界面 2. 如果对象的名称为Mytext,而且对象有一个属性Text,那么正确引用该对象的Text属性的命令是Mytext. Text.3后缀为f rm的文件表示Visual Basic的窗体文件4. 应用程序打包后，其打包文件的后缀是.exe 5. 当鼠标在对象上单击时，将触发该对象的click事件三、简答题1. 什么是对象的属性、事件和方法？三者之间的关系如何？对象的属性:对象所具有的特征,如背景颜色,高度,宽度等;对象的事件:对象响应的动作;对象的方法: Visual B

3、asic中的系统函数;2. 如何设置对象的属性？如何调用对象的方法？设置对象的属性: 1) 在属性栏中设置; 2) 对象名.属性 =属性值调用对象的方法: 对象名. 方法第2章 VB程序设计基础 （数据类型与表达式,没有采用书本习题）一、单选题 1.设 a=5,b=4,c=3,d=2,下列表达式的值是 B .3 2*b Or a=c And bc Or cd A) 1 B) True C) False D) 2 2.、/、Mod、*四个算术运算符中,优先级别最低的是 C . A) B) / C) Mod D) * 3.在 VisuaIBasic中,日期/时间型常量要用 B 括起来. A) B)

4、 # C) * D) 4.设 a%=20,b$=”30”,则下列输出结果是”2030”的语句是 D . A) Print str(a) B) Print “a”+b C) Print a+b D) Print a & b 5.设 a=10,b=5,c=1,执行语句 Print a b c 后,窗体上显示的是 B _. A) True B) False C) 1 D) 出错信息 6.语句 Print 5 * 5 5 / 5 的输出结果是 B . A) 5 B) 25 C) 0 D) 1 7.语句 Print Sgn(-62) +Abs(-62) +Int(-62) 的输出结果是 C . A) -

5、36 B) 1 C) -1 D) -72 8.表达式 Left(”how are you”,3) 的值是A.A) how B) are C) you D) how are you 9.选拨身高 T 超于1.7 米且体重 W小于 62.5 千克的人,能表示该条件的布尔表达式是C. A) T 1.7 And W=62.5 B) T =62.5 C) T 1.7 And W 1.7 0r w y和 y z 同时成立,则下述选项中,正确的是D. A) x y .And.y z B) x y z C) x y And z D) x y And y z 14 .满足“当 x 的值是偶数时为真,奇数时为假”

6、要求的表达式是A. A) x Mod 2O B) Not x Mod 20 C) (x2*2-x) =O D) Not(x Mod 2) 二、填空题 1.设有如下 Visual Basic表达式: 5*x2-3*x-2*sin(a)/3 ,它相当于代数式 【1】 5X 2 -3X-2sina/32.表示x是5的倍数或9的倍数的逻辑表达式是 【4】 _. x mod 5 = 0 OR x mod 9 = 0 3.已知a=3.5,b=5.0,c=2.5,d=true,则表达式 a=0 AND a+c b+3 OR NOT d的值是 5】 _.False第3章 VB程序控制结构 书本习题3一、选择题

7、1. InputBox函数返回值的类型为( B )。 A.数值 B.字符串 C.变体 D.数值或字符串(视输人的数据而定)2. 设a=6,则执行x=iif (a5,-1,0)后,x的值为( D )。 A. 5 B. 6 C.0 D.-13. 假定有以下程序段: For i = 1 To 3 For j = 5 To 1 Step -1 Print j Next j, i Print j的执行次数是( A )。 A. 15 B. 16 C. 17 D. 194. 以下程序段的输出结果为( B )。X = 1Y = 4Do Until Y 4 X = X * Y Y = Y + 1LoopPrin

8、t XA.1 B. 4 C. 8 D. 20二、填空题1. 语句Print 5*55/5的输出结果是25 。2. 执行下面的程序段后,s的值是 9 。s = 5For i = 2.6 To 4.9 Step 0.6 s = s + 1Next i3. 以下程序段输出的结果是 3 。num = 0While num = 2 num = num + 1WendPrint num 4. 以下循环执行的次数是10 。 k = 0 Do While k = 10 k = k + 1 Loop三、实验题1. 编写程序,计算1+2+3+100。Dim i As Integer, sum As Integer

9、 sum = 0For i = 1 To 100 tsum = sum + iNext iText1.Text = sum2. 假设我国现有人口12亿,每年增长率为1,计算多少年后增加到20亿。Dim n, s1, s2 s1 = 12: n = 0 Do While s2 = 20 s2 = s1 + s1 * 0.1 s1 = s2 n = n + 1 Loop Print s2, n3. 假设有以下每周工作安排: 星期一、三:讲计算机课 星期二、四:讲程序设计课 星期五:进修英语 星期六:政治学习 星期日:休息编写程序,对上述工作日进行检索。程序运行后,要求输人一周里的某一天,程序将输出

10、这一天的工作安排。输入时用06代表星期日到星期六,如果输人06以外的数,则程序结束运行。Dim msg, rq msg = 请输入一个字母或0-6之间的数字. rq = Val(InputBox(msg) 输入一个数字 Select Case rq Case 2, 4 msg = 讲计算机课 Case 3, 5 msg = 讲程序设计课 Case 6 msg = 进修英语 Case 7 msg = 政治学习 Case 1 msg = 休息 Case Else End End Select MsgBox msg第3章 VB程序控制结构补充习题 一、单选题 1. 设 X 初值为 0，则下列循环语句

11、执行后，X 的值等于 A .For i=1 To 10 Step 2 X=X+i Next i A) 25 B) 36 C) 24 D) 27 2. 执行以下程序段时， C . x=1 Do While x0 x=x*x print x; Loop A) 循环体将执行 1次 B) 循环体将执行 0 次 C) 循环体将执行无限次 D) 系统将提示语法错误 3. 有如下程序： Do 循环体 Loop While 则以下叙述中错误的是 A . A) 若“条件”是一个为 0 的常数，则一次也不执行循环体 B) “条件”可以是关系表达式、逻辑表达式或常数 C) 循环体中可以使用 Exit Do语句 D)

12、 如果“条件”总是为 True，则不停地执行循环体 4. 在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim num As Integer num = 1 Do Until num 6 Print num; num = num + 2.4 Loop End Sub 程序运行后，单击命令 按钮，则窗体上显示的内容是 B . A) 1 3.4 5.8 B) 1 3 5 C) 1 4 7 D) 无数据输出 5. 在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub

13、Command1_Click() Dim a As Integer, s As Integer a = 8 s = 1 Do s = s + a a = a- 1 Loop While a = 0 Print s; aEnd Sub 程序运行后，单击命令按钮，则窗体上显示的内容是 C . A)7 9 B) 34 0 C) 9 7 D) 死循环 6. 下列程序段显示 C 个“*”. For i=1 to 5 For j=1 to 3 Print ”*” Next j Next i A) 5 B) 3 C) 15 D) 8 7. 要使下面程序段能正确显示 1！、2！、3！、4！的值，第一行括号处应

14、填写 B . ( ) For j=1 to 4 n=n*j Print n Next j A)n=0 B)n=1 C)j =1 D)j=0 三、编程题 1. 输入三角形的三条边 a，b，c 的值，根据其数值，判断能否构成三角形；若能，还要显示三角形的性质：等边三角形、等腰三角形、直角三角形和任意三角形. a = Val(InputBox(请输入第一条边长:)b = Val(InputBox(请输入第二条边长:)c = Val(InputBox(请输入第三条边长:) Print 输入的三个数是:; a; b; cIf (a + b = c Or a + c = b Or b + c = a) T

15、hen Print 输入的三个数不能构成三角形!Else If (a = b And a = c And b = c) Then Print 输入的三个数构成等边三角形! ElseIf (a 2 + b 2 = c 2 Or a 2 + c 2 = b 2 Or b 2 + c 2 = a 2) Then Print 输入的三个数构成直角三角形! ElseIf (a = b And a c) Or (a = c And b c) Or (b = c And a c) Then Print 输入的三个数构成等腰三角形! Else Print 输入的三个数构成任意三角形! End IfEnd If

16、2. 输入一年份，判断是否为闰年，并显示有关信息.判断闰年的条件是：年份能被4整除但不能被100 整除，或者能被400 整除. a = Val(InputBox(请输入要判断是否为闰年的年号：)If (a Mod 4 = 0 And a Mod 100 0) Or a Mod 400 = 0) Then Print 年号= & a & 是闰年Else Print 年号= & a & 不是闰年End If3. 某次大奖赛，有七个评委打分，要求输入七个评委的打分分数，去掉一个最高分和一个 最低分后，求出该参赛者的得分. Max = 0Min = 100For i = 1 To 7a = Val(I

17、nputBox(请输入选手 & i & 个分数)If (a Max) Then Max = aIf (a Min) Then Min = aPrint a=; a; max=; Max; min=; Mins = s + aPrint i=; i; h=; h; s=; sNextave = (s - Max - Min) / 5Print ave=; ave4. 一个球从100m高度自由落下，每次落地后反弹回原高度的一半再落下.求它在第 10次 落地时共经过多少米？落地 10次反弹高度是多少.h = 100s = hPrint i=; 1; h=; h; s=; sFor i = 2 To

18、10h = h / 2s = s + 2 * hPrint i=; i; h=; h; s=; sNext第四章 VB常用内部控件书本习题4 一、选择题 1.下列控件中，没有Caption属性的是( B )。 A.框架 B.列表框 C. 复选框 D.单选按钮 2.将数据项China添加到列表框(Listl)中成为第一项应使用( A )语句。 A. Listl.AddItem”China”，0 B. Listl.AddItem”China”，1 C. Listl.AddItem 0，”China” D. Listl.AddItem 1，”China” 3.文本框(Textl )中有选定的文本,执

19、行Textl. SelText=“Hello”的结果是( A )。 A.”Hello”将替换掉原来选定的文本 B.”Hello”将插人到原来选定的文本之前 C. Textl.SelLength为5 D.文本框中只有”Hello” 4.在程序运行期间,如果拖动滚动条上的滚动框,则触发的滚动事件是(C )。 A. Move B. Change C. Scroll D. GetFocus 5.能改变窗体边框线类型的属性是( B )。 A. FontStyle B. BorderStyle C. BackStyle D. Border 6.用户在组合框中输人或选择的数据可以通过一个属性获得,这个属性是

20、( C )。 A. List B. ListIndex C. Text D. ListCount 7.设置复选框或单选按钮标题对齐方式的属性是( B )。 A. Align B. Alignment C. Sorted D. Value 二、填空题1.图像框中的图形能与图像框的大小相适应，应该把图像框的Stretch属性设置为 true .2.计时器事件之间的间隔通过Interval 属性设置。 3.为了使标签能自动调整大小以显示全部文本内容,应把标签的Autosize 属性设置为True 。 4.要想在文本框中显示垂直滚动条，必须把ScrollBars 属性设置为2,同时还应把Multlin

21、e 属性设置为True 。 5.在窗体上画一个叉本框和一个图片框，然后编写如下两个事件过程： Private Sub Form Click( ) Textl.Text=“VB程序设计” End Sub Private Sub Textl Change(0) Picturel .Print”VB Programming” End Sub程序运行后，单击窗体，则在文本框中显示的内容是VB程序设计 ，在图片框中显示的内容是VB Programming 6.表示滚动条控件取值范围最大值的属性是Max 。 7. Alignment 属性设置为1，单选按钮和复选框的标题显示在左边。 三、简答题1.框架的作

22、用是什么？如何在框架中建立控件？框架的作用是对窗体上的控件进行分组在框架中建立控件:必须先画框架，然后在框架内画出需要成为一组的控件，这样才能使框架内的控件成为一个整体，和框架一起移动。2.在列表框中添加项目有哪几种方法？1) 在属性栏里设置List属性添加项目; 2) 用AddItem方法添加项目3.组合框有哪几种类型?能否用文本框加列表框实现组合框的功能？3种类型,由style取值决定 取值0：为”下拉式组合框”,可以输人文本或从下拉列表中选择表项。 取值1：为”简单组合框”，列表一直显示在屏幕上，可以选择表项，也可以在编辑区中取值2：为”下拉式列表框”。4.列表框的Columns属性有什

23、么作用？ 该属性用来确定列表框的列数。设置为0(默认)时，项目呈单列显示;设置为1，项目呈多行多列显示; 设置为大于1，则项目呈单行显示 四、实验题1.在名称为Forml的窗体上画一个图片框(名称为Picturel)、一个垂直滚动条(名称为VScrolll)和一个命令按钮(名称为Commandl,标题为”设置属性”)，通过”属性”窗口在图片框中装人一个图形，图片框的宽度与图形的宽度相同，图片框的高度任意(如图4-22所示)。编写适当的事件过程。程序运行后，如果单击命令按钮，则设置垂直滚动条的如下属性：Min 100 Max 2400 LargeChange 200 SmallChange 20

24、 之后就可以通过移动滚动条上的滚动块来放大或缩小图片框的高度。运行后的窗体如图4-22所示。 图4-22运行结果 Private Sub Command1_Click()VScroll1.Min = 100VScroll1.Max = 2400 VScroll1.LargeChange = 200VScroll1.SmallChange = 20End SubPrivate Sub VScroll1_Scroll()Picture1.Height = VScroll1.ValueEnd Sub 2.在窗体上画两个命令按钮(其名称分别为Commandl和Command2，标题分别为”添加项目”和

25、”删除项目”)，再画一个列表框(名称为Listl)和一个文本框(名称为Textl)，如图4-23所示。编写适当的事件过程。程序运行后，如果单击”添加项目”命令按钮，则从键盘输人要添加到列表框中的项目;如果单击”删除项目”命令按钮，则从键盘输人要删除的项目，将其从列表框中删除。程序的运行情况如图4-24所示。 图4-23添加控件图4-24运行结果Private Sub Command1_Click()List1.AddItem Text1.TextText1.Text = End SubPrivate Sub Command2_Click()For i = 0 To List1.ListCoun

26、t - 1If List1.List(i) = Text1.Text Then List1.RemoveItem iEnd IfNext End Sub第四章 VB常用内部控件补充习题 一、单选题 1. 下列控件中没有Caption属性的是 B . A) 框架 B) 列表框 C) 复选框 D) 单选按钮 2. 复选框的Value属性为1时，表示 B . A)复选框未被选中 B)复选框被选中 C)复选框内有灰色的勾 D)复选框操作有误 3. 用来设置斜体字的属性是 A . A) FontItalic B) FontBold C) FontName D) FontSize4. 将数据项“China

27、”添加到列表框 List1 中成为第二项应使用 A 语句. A) List1.AddItem China,1 B) List1.AddItem China, 2 C) List1.AddItem 1, China D) List1.AddItem 2, China 5. 引用列表框List1最后一个数据项，应使用 C 语句. A) List1.List(List1.ListCount) B) List1.List(ListCount) C) List1.List(List1.ListCount-1) D) List1.List(ListCount-1) 6. 在窗体上画一个文本框和一个计时器控

28、件，名称分别为Text1和Timer1，在属性窗口中 把计时器的Interval属性设置为1000，Enabled属性设置为False，程序运行后，如果单击命令按钮，则每隔一秒钟在文本框中显示一次当前的时间.以下是实现上述操作的程序： Private Sub Command1_Click() Timer1. End Sub Private Sub Timer1_Timer() Text1.Text = Time End Sub Timer1 控件的属性及值为 A . A) Enabled=True B) Enabled=False C) Visible=True D) Visible=False 7. 假定在图片框 Picture1中装入了一个图形，为了清除该图形（不删除图片框)，应采用的正确方法是 B . A) 选择图片框，然后按 Del键 B) 执行语句 Picture1.Picture=LoadPicture() C) 执行语句 Picture1.Picture= D) 选择图片框，在属性窗口中选择 Picture属性，然后按