【VB开源代码栏目提醒】：文章导读：在新的一年中，各位网友都进入紧张的学习或是工作阶段。

    网学会员整理了VB开源代码-VB程序设计复习题及答案 - 技术总结的相关内容供大家参考，祝大家在新的一年里工作和学习顺利！

中南大学现代远程教育课程专科考试复习题及答案 《VB程序设计与应用》 一、选择题在每小题给出的四个选项中只有一项是符合题目要求的请把所选项前的字母填在题后的括号内。

     1. Visual Basic程序中分隔一行中各语句的字符是 。

     A ‘ B : C D _ 2. 下列可作为Visual Basic的变量名的是 。

     A: Filename B: AAB C: AD D : Print 3. 要让菜单项无效应将 属性值设置为False。

     A. Visible B. Enabled C. Moveable D. Checked 4. 以下过程是 事件。

     Prviate Sub Form_Load …… End Sub A: 命令按钮的单击 B: 命令按钮的装载 C 窗体的装载 D: 窗体的单击 5. Vb中描述文件扩展名的是 属性。

     A: Drive B: Pattern C: FileName D: Path 6. 关于Visual Basic中事件的说法中不正确的为 。

     A 事件是由Visual Basic预先定义好的能够被对象识别的动作 B DblClick双击是Visual Basic中的一种事件 C 一个对象可以识别一个或多个事件 D 对于一个系统提供的对象可以识别哪些事件需要程序员自己定义 7. 下列控件中可设置滚动条是 。

     A. 检查框复选框 B. 框架 C. 文本框 D. 标签框 8. 在Visual Basic中建立一个空窗体 不会是其默认名。

     A. Form1 B. Form2 C. Formx D. Form10 9. Const One1则One为 类型的常数。

     A 整型 B 字节型 C 长整型 D 单精度型 10. 关于逻辑型数据下列说法错误的是 。

     A. 逻辑型数据只有两种可能值True或者False B. 当把逻辑值转换为数值时False转为0True转为1 C. 当把其他类型数据转换为逻辑数据时非0数转换为True0转换为False D. 逻辑型数据以2个字节存储 11. 以下 不是Visual Basic的特点。

     A: 结构化程序设计 B: 集成可视化程序开发环境 C: 事件驱动编程机制 D: 可将用户的编程思想自动转换成程序代码 12. 窗体的load事件可以被用来实现的功能为 。

     A: 确定窗体的位置 B: 从内存中清楚一个窗体 C: 在程序启动时对属性和变量初始化 D: 重画窗体 13. 单复选框的控件名称为 。

     A. OptionBotton B. CheckBox C. PictureBox D. Image 14. 若要禁止窗体被移动可设置窗体的 属性为False。

     AMoveable B: Move C: MinButton D: ControlBox 15. 若要设置定时器的定时间隔设为10秒应将 属性值设为10000。

     A. Interval B. Value C. Enabled D. Text 16. 以下 是文件夹列表框。

     A. DirListBox B. DriveListBox C. FileListBox D. ComboBox 17. 以下 可从通用对话框的“字体”对话框中返回用户选择的字体名。

     A. FileName B. Path C. FontName D. Color 18. 下列哪个操作可以清除文本框对象Text1的内容 。

     A. Text1.Text B. Text1.cls C. Text D. cls 19. 要想通过单击Command1弹出Form2窗体则可在Command1的单击事件中使用 命令。

     A. Load Form2 B. Form2.Show C. Form2.SetFocus D. Form2.PopupMenu 20. 以下属性中只在运行时起作用的为 。

     A. Caption属性 B. Visible属性 C. BorderStyle属性 D. Picture属性 21. 在运行时若要使文本框获得输入焦点可调用文本框对象的 方法来实现。

     A. Refresh B. GetFocus C. SetFocus D. Tab 22. 在窗体中利用Print方法输出文本信息时信息的输出位置由 属性设置。

     A. Left B. Top C. xy D. CurrentXCurrentY 23. 语句Dim student105 to 100 定义的是一个 维数组。

     A. 2 B.3 C. 5 D.10 24. 默认情况下语句Dim student10 to 11 4 定义的数组有 个元素。

     A. 20 B.22 C. 10 D.11 25. 已知Eng190Math180Comp195 Total1 Eng1Math1Comp1则Total1 。

     A. 265 B.90 C. 80 D.95 26. 已知在“通用”代码有以下语句 Dim A As Integer 则在某一事件代码中使用 是正确的。

     A. ReDim A304 B. ReDim A4 As C. ReDim A100 D. ReDim A 27. Int-23.512的值为 。

     A.-23 B.-24 C. 24 D.23 28. 将ASCII码转换成字符串的函数是 。

     A. Chr B. Str C. Asc D. Val 29. 表达式 MidBeijing200844的值是 。

     A. Beij B. jing C. inj2 D. 2008 30. A3.142则ValA的值为 。

     A. 3.142 B. 5.14 C. 3.14 D. 5.14 二、填空题请把答案填在题中横线上。

     1. Visual Basic中有一种控件组合了文本框和列表框的特性这种控件是_______。

     2. Visual Basic提供的对数据文件的三种访问方式为随机访问方式__________和二进制访问方式。

     3. 为了能在运行时把d:pic文件夹下的图形a.jpg装入图片框Picture1所使用的语句为___________。

     4. 计时器控件能有规律的以一定时间间隔触发_______事件并执行该事件过程中的程序代码。

     5. Visual Basic应用程序中标准模块文件的扩展名是____________。

     6. 与数学表达式cos2ab÷3x5对应的Visual Basic表达式是_____________. 7. 要同时选定窗体上的多个控件可以按住______或_______键然后依次单击窗体上的各控件. 8. 在Visual Basic中最基本的对象是__________. 9. 要在Visual Basic工程中添加一个新的窗体可以在主窗口的工具栏中选择_______按钮. 10. 在代码窗口中输入某行代码并按回车键之后如果代码变成______颜色说明该行代码有语法错误. 三、程序改错 1. 程序功能已知24有8个正整数因子即1234681224而24正好被其因子个数8整除。

    问100300之间有多少个这样的数。

    程序中有两行有错误。

    改正错误使它能输出正确的结果。

     Private Sub Command1_Click Dim n1 As Integer n2 As Integer Dim x As Integer Dim i As Integer n2 0 For x 100 To 300 n2 0 For i 1 To 100 If x Mod i 0 Then n1 n1 1 End If Next i If x Mod n1 0 Then n2 n2 1 End If Next x Print n2 End sub 2.程序功能利用函数pd计算15000之间能被17和37整除的数的个数。

    程序中有错误改正错误使程序能输出正确的结果。

     Private Sub Command1_Click Dim i As Integer Dim s As Integer s 0 For i 1 To 5000 If pdi Then s s 1 Next i Print s End Sub Private Function pdx As Integer As Boolean If x Mod 17 0 Or x Mod 37 0 Then pd True Else pd False End If End Fuction 3. 程序功能根据整型参数m计算100-999的平方根的倒数之和。

    程序的函数fun中有一行有错误改正错误使它能输出正确的结果。

     Private Sub Command1_Click Print Formatfun100 999 . End Sub Private Function funm As Integer n As Integer As Single y 0 For i m To n t 1 / Sqri y y t Next i fun t End Function 四、程序填空题。

     1.士兵在演练过程中队伍变换成10、21、35、60行时队形都能成为矩形。

    问参加演练的士兵最少有多少人 Private Sub Form_Click Dim a b c d n a 10 b 21 c 35 d 60 n 60 Do While ________________________________ n n 1 Loop Print n End Sub 2. 用cosx≈1x2/2x4/4-????-1nx2n/2n的公式求近似值直到最后一项绝对值小于0.00001为止。

    设x7。

     Private Sub Form_click Dim x As Integer i As Integer Dim xpower As Single Dim y As Single x ValInputBox请输入x i 0 z 1 y 1 Do While Absz 0.00001 factor 1 i i 1 For j 1 To 2 i factor factor j Next j xpower x 2 i ________________________________ y y z Loop Print formaty 0. End Sub 3. 已知一个数列的前3项为001从第4项开始每项为前3项的和编程求此数列的第39个数。

     Private Sub Form_Click Dim i f0 f1 f2 f3 FontSize 14: FontBold True f0 0 f1 0 f2 1 For i 4 to 39 ________________ f0 f1 f1 f2 f2 f3 Next i Print f3 End Sub 五、编程题 1、编写程序验证输入的3位正整数是否为同构数。

    X若出现在自己的平方数的末3位则X是同构数。

    如625的平方是390625则625为同构数。

     2.设有如下两组数据 A: 1 23 4 56 7 8 9 10 B: 100 99 98 97 96 9594 93 92 91 编写一个程序把上面两级数据分别读入两个数组中然后把两个数组中对应的元素相加即1100????1091。

    并把相应的结果放入三个数组中最后输出第3个数组的值。

     3.用Circle方法画圆弧和椭圆弧。

    如下图所示。

    要求中心点相同圆弧长度和角度随机颜色随机圆弧数为20。

     4.在图片框中用PSet方法随机地产生若干个彩色的点。

    窗体上有3个命令按钮“画点”、“清除”、和“退出”。

    如下图所示。

     PSet方法对象名.PsetStepxy颜色 六、问答题15分 1. 简述多文档及其特性。

     简述对话框的分类和特点。

     《VB程序设计与应用》答案 一、选择题在每小题给出的四个选项中只有一项是符合题目要求的请把所选项前的字母填在题后的括号内。

     1 2 3 4 5 B A B C B 6 7 8 9 10 D C C C D 11 12 13 14 15 D C A A A 16 17 18 19 20 A C A A B 21 22 23 24 25 C D A C A 26 27 28 29 30 C B A B C 二、填空题请把答案填在题中横线上。

     1. 组合框 2. 顺序访问方式 3. Picture1.pictureLoadPicture“d:pica.jpg” 4. Timer 5. .bas 6. cosab2/3x5 7. Shift Ctrl 8. 窗体 9. 添加窗体 10. 红色 三、程序改错题 1. 第七行 n2 0 改成 n1 0 第八行 For i 1 To 100改成 For i 1 To x 2. 第十一行 Or 改成 And 3. 第十行 fun t 改成 fun y 四、程序填空题 1. a 1000 b 100 c 10 d e b 1000 c 100 d 10 e 2. 100 - i - j 100 - 5 i - j 2 3. c i Mod 100 10 五、编程题 1. 编程代码为 Private Sub Command1_Click Dim i m As Integer For i 100 To 999 m i i Mod 1000 If i m Then Print i End If Next i End Sub 2. 编程代码 Private Sub Command1_Click Dim a10 b c10 As Integer For i 1 To 10 ai i Next i b Array100 99 98 97 96 95 94 93 92 91 For i 1 To 10 ci ai bi - 1 Print ci Next i End Sub 3.用Circle方法画圆弧和椭圆弧。

    如下图所示。

    要求中心点相同圆弧长度和角度随机颜色随机圆弧数为20。

     Private Sub Command2_Click pi 3.1415926 a1 0 c 1 DrawWidth 1 For r 100 To 2000 Step 100 a2 a2 pi / 2 Mod 2 pi Circle 1800 1200 r QBColorc a1 a2 a1 a1 pi / 4 c c 1 DrawWidth DrawWidth 1 Next r End Sub Private Sub Command3_Click Cls End Sub 4. 编程代码为 Private Sub Command1_Click Picture1.DrawWidth 10 For i 1 To 100 r Int256 Rnd g Int256 Rnd b Int256 Rnd x Rnd Width y Rnd Height Picture1.PSet x y RGBr g b Next i End Sub Private Sub Command2_Click Picture1.Cls End Sub Private Sub Command3_Click End End Sub 六、问答题简述多文档及其特性。

     答 定义多文档界面MDIMultiple Document Interface允许创建在单个容器窗体中包含多个窗体的应用程序。

    绝大多数基于Windows的大型应用程序都是多文档界面例如Microsoft Word和Microsoft Excel等。

    多文档界面可同时打开多个文档它简化了文档之间的信息交换。

     多文档界面有如下特性 1 所有子窗体均显示在MDI窗体的工作区中。

    用户可以改变、移动子窗体的大小但被限制在MDI窗体中。

     2 当最小化子窗体时它的图标将显示在MDI窗体上而不是在任务栏中。

    当最小化MDI窗体时所有的子窗体也被最小化只有MDI窗体的图标出现在任务栏中。

     3 当最大化一个子窗体时它的标题与MDI窗体的标题一起显示在MDI窗体的标题栏上。

     4 MDI窗体和子窗体都可以有各自的菜单当子窗体加载时覆盖MDI窗体的菜单。

     2. 简述对话框的分类和特点。

     答 分类对话框分为3种类型预定义对话框、通用对话框和自定义对话框 1 预定义对话框也称预制对话框是由系统提供的。

    VB提供了两种预定义对话框即输入框和信息框或消息框前者用InputBox函数建立后者用MsgBox函数建立具体用法参见第4章。

     2 通用对话框是一种控件用这种控件可以设计较为复杂的对话框。

     3 自定义对话框也称定制对话框这种对话框由用户根据自己的需要进行定义。

    输入框和信息框尽管很容易建立但在应用上有一定的限制很多情况下无法满足需要用户可以根据具体需要建立自己的对话框。

    本章将介绍后两种对话框即通用对话框和自定义对话框。

     特点 1 在一般情况下用户没有必要改变对话框的大小因此其边框是固定的。

     2 为了退出对话框必须单击其中的某个按钮不能通过单击对话框外部的某个地方关闭对话框。

     3 在对话框中不能有最大化按钮Max Button和最小化按钮Min Button以免被意外地扩大或缩成图标。

     4 对话框不是应用程序的主要工作区只是临时使用使用后就必须关闭。

     3.