《VB程序设计》课程综合练习题.doc

VB程序设计综合练习题一、填空题1. 在VB中标准模块文件的扩展名是_。2. 逻辑常量为True或_。3. 日期常量表示时，用符号_将日期型数据括起来。4. 局部变量只能在_中声明和使用。5. 生成输入框的命令是_。6. 设置是否可以用Tab键来选取命令按钮，应该用_属性。利用对象的属性setfocus可获得焦点，对于一个对象，只有其visible属性和7. _属性为true，才能接受焦点。8. 所有控件都具有的共同属性是_属性。9. VB有三种工作模式，分别是设计（Design）模式、_和中断（Break）模式。10. 通常情况下，VB中一个工程主要包括如下四个文件：_、_、类模块文件和标准模块文件。11. 一般可以使用_关键字声明常量。12. 若要将隐藏窗体Form1显示出来，则可通过执行代码_来实现。13. 为了使一个Picture控件能自动根据装入的图片调整大小，应设置该控件的AutoSize属性为_。14. 在VB中窗体文件的扩展名是_。15. 在VB中，用_语句设定数组的下界，用_和_语句分别返回数组的上、下界。16. 生成消息框的命令是_。17. 表达式chr(Asc(a) + 4)的值为_。18. 分析ForNext循环结构的实例：For i = 5 To 30 Step 2 中，循环体一共执行了_次。19. 为了在VB中存储一个4行5列的二维矩阵，需要定义一个整型的数组，请把数组定义语句补充完整：Dim Juzhen(_ _) as Integer。20. 在VB中，最主要的两种对象是_和_。21. 常量分为普通常量和_常量。22. 不管焦点在哪个控件上，按_键相当于按了取消按钮。23. _是程序中VB停止执行的地方。24. Visual Basic是一种面向_的可视化程序设计语言。25. 函数Abs(x)的功能是_。参考答案：1. bas 2、False 3、# 4、过程 5、InputBox 6、Tabstop 7、 Enabled 8、Name 9、窗体文件、工程文件 10、运行模式 12、Const 13、 form1.Show 14、True 15、.frm 16、option base、ubound、lbound 17、MsgBox 18、e 19、13 20、1 to 4,1 to 521、 窗体、控件 22、符号 23、ESC 24、断点 25、对象 26、求x的绝对值二、选择题1窗体Form1的Name属性是Frm1，它的单击事件过程名是（ ）AForm1_Click BForm_Click CFrm1_Click DMe_Click2下面程序运行后输出的结果是（ ） Str1$=AMERICA Str2$=Len(Str1$) PRINT Str2$ ENDA5 B7 C6 D93语句DIM AA(3,4,5)中定义的数组有多少个元素( )A12 B60 C120 D3454以下能够触发文本框Change事件的操作是（ ）A文本框失去焦点B文本框获得焦点C设置文本框的焦点D改变文本框的内容5以下哪个是合法的变量（ ）ArightBabc123C123_abcDab123c6为了使用通用对话框进行打开文件的操作，应将通用对话框的Action属性设定为（ ）A0 B1 C2 D37下列说法错误的是（ ）A在同一模块不同过程中的变量可以同名B不同模块中定义的全局变量不可以同名C引用另一模块中的全局变量时，必须在变量名前加模块名D同一模块中不同级的变量可以同名8Visual Basic提供的On Error Resume next错误陷阱语句表示（ ）A当发生错误时，使程序转跳到语句标号为0的程序块B当发生错误时，不使用错误处理程序块C当发生错误时，忽略错误行，继续执行下一语句D当发生错误时，终止本过程执行，继续执行下一过程9组合框的风格可通过（ ）属性来设置。A. BackStyle B. BorderStyle C. Style D. Sorted10从键盘上输入两个字符串，分别保存在变量str1、str2中。确定第二个字符串在第一个字符串中起始位置的函数是（ ）ALeft BMid CString DInstr11当一个复选框被选中时，它的Value属性的值是（ ）A3 B2 C1 D0 12在运行阶段，要在文本框TEXT1获得焦点时选中文本框中所有内容，对应的事件过程是（ ）APrivate Sub Text1_GotFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End SubBPrivate Sub Text1_LostFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End SubCPrivate Sub Text1_Change( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End SubDPrivate Sub Text1_SetFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End Sub13设x=4,y=8,z=7，表达式xz) Or zx的值是（ ）A1B-1 CTrue DFalse 14决定标签（Label）显示的属性是（ ）AText BName CCaption DAlignment15设有如下程序段：x=2 For i=1 To 10 Step 2 x=x+i Next 运行以上程序后，x的值是（ ） A26 B27 C38 D57参考答案：BACDD、BBCCD、CADCB三、读程序题（每题5分，共10分）1阅读下面的程序，分析并写出其功能。Sub insert(a() As Single,ByVal x As Single)Dim m as integer,n as integern=1Do While na(n)n=n+1LoopFor m=20-1 To n Step 1a(m+1)=a(m)Next ma(n)=xEnd Sub答：功能如下：在20个由小到大排列的数据中插入一个数，插入数据后的数据仍按由小到大的顺序排列。2读下面的程序，分析其功能，写出运行结果。Sub sele() Dim n as Integeri=21:n=3 Do While in i=i-nLoop Print iEnd Sub答：结果如下：3四、简答题1结构化程序设计的特点是什么？2在一个窗体中只能选择一个单选按钮吗？如果不能选择多个，请说明原因；如果能选择多个，请说明如何做才能选择多个。3颜色函数主要有哪些？4表达式23 And 44的值是什么？5假定有一个菜单项，名为MenuItem，为了在运行时使该菜单项失效（变灰），应使用什么语句？6在设计状态，若用户想打开代码窗口，应怎样操作？代码窗口主要包括哪几部分？7逐语句和逐过程有什么区别？8在KeyPress事件中，如何取消用户刚输入的字符？9如何在框架中建立控件？10Visual Basic有哪几种程序模式？参考答案如下：1、结构化程序设计的主要特点是：一个入口和一个出口；只使用三种基本结构：顺序、选择、循环；尽量不用转向语句。2、不一定，利用框架可以实现多组单选按钮。3、颜色函数主要有：RGB、QBColor。4、False。5、MenuItem.Enabled=False。6、在设计状态，打开代码窗口至少有三种方法，只要写一种即为正确；代码窗口主要三部分：对象列表、事件列表、代码窗口。7、逐语句和逐过程的区别：前者进入过程内部，而后者不进入过程内部。8、在KeyPress事件中，若想取消用户刚输入的字符，只要将该事件的参数设置为0即可。9、先建立框架，然后再在其中建立控件。10、设计、运行和中断三种模式。五、编程题说明：只要能完成指定的功能，界面怎么设计都行。也就是说，界面如何以及代码写在哪个事件中都没有关系，但前提是必须保证完成相应的功能。1自行设计格式，输出“九九乘法表”。答：参见教材，具体代码略。2有一种数，正序读与反序读都相同，这种数叫回文数，如88、858、2332等。求出4位数以内（09999）的所有回文数。答：参考程序如下：Sub NumRev() Dim i As Integer, j As Integer 用分解法 Print 0; ; 输出特殊数0 For i = 1 To 9 Print i; ; 输出1位数 Print 10 * i + i; ; 输出2位数 For j = 0 To 9 输出3位数（个位与百位相同，十位任意） Print 100 * i + 10 * j + i; ; 输出4位数（个位与千位相同，十位与百位相同） Print 1000 * i + 100 * j + 10 * j + i; ; Next j Next iEnd Sub3输入某学生成绩（百分制），若是100成绩90输出优秀；若是90成绩80输出良好；若是80成绩70输出中等；若是70成绩60输出及格；若是60成绩0，输出不及格；若是其他数则输出error信息。答：参考代码如下：Private Sub Command1_Click()Dim x As Singlex = Val(Text1.Text)If x 100 Or x 0 Then Text2.Text = error ElseIf x 60 Then Text2.Text = 不及格 ElseIf x 70 Then Text2.Text = 及格 ElseIf x 80 Then Text2.Text = 中等 ElseIf x 90 Then Te