《高级语言程序设计VB》复习提纲Word格式.docx

1、A）.for B）.frm C）.vbp D）.bas第三章 VB语言基础1编码规则：（1） 一行可书写几句语句,之间用冒号分隔；（2） 一句语句可分若干行书写，用续行符 空格+_ 连接一行= =8. 逻辑运算符 And Or Not例3-5.表示条件“X是大于等于5，且小于95的数”的条件表达式是 。A） 5=X95 B） 5=X, X=5 and X=5 and 95例3-6.以下关系表达式中，其值为False的是 。A） ABCAbC B） thethey C） VISUAL=UCase（Visual） D） IntegerInt例3-7. 设x=4, y=8, z=7 ,以下表达式的值

2、的是xz ） Or z字符运算符关系运算符逻辑运算10.常用内部函数:算术函数： Rnd,Int,Sqr,Abs 字符串函数：Left,Right,Mid,Len,String，InStr 日期时间函数：Date, Time, Year,Month,Day 其它函数：Val, Format例3-9. 在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click（） a = 12345 Print Format$（a, 000.00） End Sub 程序运行后，单击命令按钮，窗体上显示的是 A） 123.45 B） 12345.

3、00 C） 12345 D）00123.45例3-10. 执行语句s=Len（Mid（VisualBasic,1,6）后，s的值是 。A） Visual B） Basic C） 6 D） 11例3-11. 写一个产生一个大于等于50,且小于等于100随机整数的表达式。例3-12. N是一个个位不等于零二位整数，写一个表达式将N的个位与十位交换。例3-13. 设有如下程序段：a$=”BeijingShanghai”b$=Mid（a$,InStr（a$,”g”）+1）执行上面的程序段后，变量b$的值为 。例3-14. 与数学表达式Cos2（a+b）/（3x）+5 对应的Visual Basic表达

4、式是 。第四章 基本的控制结构1. 结构化程序设计的三种基本结构: 顺序结构、选择结构、循环结构2赋值语句格式:变量名表达式3. 与用户交互函数和过程InputBox函数、MsgBox函数和MsgBox过程例4-1. 执行如下语句：a = InputBox（Today, TomorrowYesterday将显示一个输入对话框，在对话框的输入区中显示的信息是 。A）Today B）Tomorrow C）Yesterday D）Day before yesterday例4-2. 在窗体上画一个命令按钮，名称为Command1。单击命令按钮时，执行如下事件过程：Private Sub Command

5、1_Click（）a$ = software and hardwareb$ = Right（a$, 8）c$ = Mid（a$, 1, 8）MsgBox a$, , b$, c$, 1End Sub则在弹出的信息框的标题栏中显示的信息是 。A）software and hardware B）software C）hardware D）1例4-3. 以下关于MsgBox的叙述中，错误的是A）MsgBox函数返回的一个整数B）通过MsgBox函数可以设置信息框中的图标和按钮的类型C）MsgBox语句没有返回值D）MsgBox函数的第二个参数是一个整数，该参数只能确定对话框中显示的按钮数量4选 择

6、结 构4.1If 语句IfThen语句（单分支结构）IfThenElse语句（双分支结构）IfThenElseIf语句（多分支结构）4.2Select Case多分支语句 Select Case 测试表达式 Case 表达式表1 语句块1 Case表达式表1 语句块2 Case Else 语句块n End Select例4-4. 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： X= Val（InputBox （“Input”） Select Case X Case 1,3 Print “分支1” Case Is 4 Print “分支2” Case Else Print

7、 “Else分支”End Select End Sub 程序运行后，如果在输入对话框中输入2，则窗体上显示的是A）分支1 B）分支2 C）Else分支 D）程序出错4.3. 条件函数：IIf函数IIf函数形式是：IIf（表达式，当表达式为True时的值，当表达式为False时的值） 5. 循 环 结 构 For Next 循环语句 例4-5.执行下面的程序段后，变量S的值为 【 】 。s=0For k=10 To 50 Step 15 s=s+kNext kIf k50 Then s=s+k Else s=s-kEnd If例4-6.执行下面的程序段后，变量S的值为 【 】 。S = 5For

8、 i = 2.6 To 4.9 Step 0.6 S = S + 1Next I例4-7.执行下面的程序段后，i的值为【 】 ，s的值为【 】。 s = 2 For i = 3.2 To 4.9 Step 0.8 s = s + 1 Next i例4-8. 在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程： Private Sub Command1_Click（） s = 0 For i = 1 To 15 x = 2 * i - 1 If x Mod 3 = 0 Then s = s + 1 Next i Label1.Caption = s

9、程序运行后，单击命令按钮，则标签中显示的内容是 。A）1 B）5 C）27 D）45例4-9. 设有如下程序段： x = 2 For i = 1 To 10 Step 2 x = x + i Next运行以上程序后，x的值是A）26 B）27 C）38 D）57 DoLoop循环语句例4-10. 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click（） Dim num As Integer num = 1 Do Until num 6 Print num; num = num + 2.4 Loop End Sub 程序运行

10、后，单击命令按钮，则窗体上显示的内容是 。 A）1 3.4 5.8 B）1 3 5 C）1 4 7 D）无数据输出例4-11. 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Dim a As Integer, s As Integer a = 8 s = 1 Do s = s + a a = a1 Loop While a = 0 Print s; a 程序运行后，单击命令按钮，则窗体上显示的内容是 A） 7 9 B） 34 0 C） 9 7 D）死循环 循环嵌套例4-12.阅读下面的程序段：For i=1 To 3 j=1 To iFor k=j To 3a=a+1

11、Next jNext i执行上面的三重循环后，a 的值为 。A） 3 B） 9 C） 14 D）6. Exit语句 多种形式： Exit For、Exit Do、Exit Sub、Exit Function等。 作用：退出某种控制结构的执行。7. End语句多种形式： End、 End If、 End Select、 End Sub、 End Function、 作用：End结束一个程序的运行；其余表示某个结构的结束，与对应的结构语句配对出现。第五章 常 用 控 件1. 单选钮和复选框Caption属性：文本标题Value属性 单选钮（逻辑型） 检查框（数值型） True：选定 0-Unche

12、cked：未被选定 False：未选定 1-Checked：选定 2-Grayed：灰色，禁止选择例5-1. 复选框是否被选中可以通过其以下属性的值来确定 。A） True B） False C） Value D） Cancel例5-2.下面的_ 控件不具备Caption属性。A）标签框 B）单选按钮 C）命令按钮 D）文本框2. 框架（Frame） Caption属性：框架标题3. 列表框和组合框属性： List ListCount ListIndex Text方法： Clear Additem RemoveItem 例5-3. Visual Basic中有一种控件组合了文本框和列表框的特性

13、，这种控件是 。例5-4. 设组合框Combo1中有3个项目，则以下能删除最后一项的语句是 A）Combo1.RemoveItem Text B）Combo1.RemoveItem 2 C）Combo1.RemoveItem 3 D）Combo1.RemoveItem Combo1.Listcount例5-5.在窗体上画一个列表框、一个命令按钮和一个标签，其名称分别为List1、Command1和Label1，通过属性窗口把列表框中的项目设置为：“第一个项目”、“第二个项目”、“第三个项目”、“第四个项目”。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签

14、中显示列表框当前的项目数，运行情况如图所示（选择“第三个项目”的情况）。下面是实现按上述功能的程序，请填空。PrivateSubCommand1_Click（） IfList1.ListIndex=【 】Then List1.RemoveItem【 】 Label1.Caption Else MsgBox请选择要删除的项目 EndIFEndSub4. 滚动条 属性:Max：最大值; Min：最小值; Value: 滑块所处位置所代表的值。事件： Scroll：拖动滑块时会触发Scroll事件。 Change：Value属性改变时触发Change事件例5-6. 在程序运行期间，如果拖动滚动条上的

15、滚动块，则触发的滚动条事件是 A） Move B） Change C） Scroll D） GetFocus5. 时钟（Timer）第六章 时钟控件以Interval为时间间隔产生 Timer事件。Interval属性: 单位：ms（0.001s），0.5秒是500,Interval0：屏蔽计时器。 Enabled属性: True：有效计时；False：停止时钟工作事件 Timer例5-7. 将计时器Timer1的时间间隔设置为1秒钟的正确语句是 。A） Timer1.Value=1000 B） Timer1.Time =1000C） Timer1.SmallChange=1000 D） Ti

16、mer1.Interval=1000例5-8. 在窗体上画一个名称为Timer1的计时器和一个名称为Label1的标签。当运行程序后，将在标签中显示当前时间的数字时钟（包括 时：分：秒）。请在 【 】 处填入适当的内容，将程序补充完整。Private Sub Form_Load（）Timer1.Interval=1000Private Sub Timer1_Timer（）例5-9.下列各组控件都具有Caption属性的是 。A）窗体、标签 B）标签、定时器 C）窗体、文本框 D）文本框、定时器第六章 数组1. 静态数组及声明: 下标的下界和上界必须是常量。下界缺省为0，也可在重新定义数组的下界

17、。例如： Option Base 1例6-1. 用下面语句定义的数组的元素个数是Dim A （-3 To 5） As IntegerA） 6 B） 7 C） 8 D） 9例6-2. 语句DIM A（3,4,5）中定义的数组有多少个元素A.345 B.12 C.60 D.1202. 数组操作例6-3. 在窗体上画一个命令按钮，然后编写如下程序:Dim a（10,10） As IntegerFor i=2 To 5 For j=5 To 7 a（i,j）=i+j Next jPrint a（2,5）+a（3,6）+a（4,7）程序运行后单击命令按钮，输出结果是_。A）24 B） 27 C）30 D

18、）32例6-4. 在窗体上面画一个命令按钮，然后编写如下事件过程：Option Base 1Private Sub Commandl_Click（）Dim aa = Array（1,2,3,4）j = 1 i = 4 To 1 Step -1s = s + a（i）*jj =j*10Next iPrint s Sub运行上面的程序，单击命令按钮，其输出结果是A） 4321 B） 12C） 34 D） 1234例6-5. 设有程序： OptionBase1 PrivateCommand1_Click（） Dimarr1,MaxasInteger arr1Array（12,435,76,24,78

19、,54,866,43） 【 】arr1（1） Fori1To8arr1（i）Then Nexti Print最大值是:;Max 以上程序的功能是：用Array函数建立一个含有8个元素的数组，然后查找并输出该数组中元素的最大值。请填空。例6-6. 在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click（） Dim array1（10, 10） As Integer Dim i As Integer, j As Integer For i = 1 To 3 For j = 2 To 4 arr

20、ay1（i, j） = i + j Next j Next i Text1.Text = array1（2, 3） + array1（3, 4） 程序运行后，单击命令按钮，在文本框中显示的值是【 】 A） 15 B） 14 C） 13 D） 12 例6-7. 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Option Base 1 a=Array（1,2,3,4,5）For i = 1 To UBound（a）a（i） = a（i） +i 1NextPrint a（3）程序运行后，单击命令按钮，则在窗体上显示的内容是A）4 B） 5 C） 6 D） 7例6-8.阅读程

21、序Private Sub Form_Click（） Dim arr,Sum Sum = 0 arr = Array （1,3,5,7,9,11,13,15,17,19） For i = 1 To 10 If arr（i） / 3=arr（i） 3 Then Sum = Sum+ arr（i） End If Print Sum程序运行后，单击窗口，输出结果为A）13 B）14 C）27 D）15第七章 过程1.函数过程的定义和调用：以Function保留字开始的为函数过程2.子过程的定义和调用：Sub保留字开始的为子过程3. 参数传递: 传址与传值传址：形参得到的是实参的地址，当形参值的改变同时也改变实参的值。传值：形参得到的是实参的值，形参值的