2022年VisualBasic程序设计复习题及参考答案.docx

《2022年VisualBasic程序设计复习题及参考答案.docx》由会员分享，可在线阅读，更多相关《2022年VisualBasic程序设计复习题及参考答案.docx（16页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、中南高校网络训练课程（专科）考试复习题及答案Visual Basic程序设计与应用一、挑选题：在每道题给出的四个选项中，只有哪一项符合题目要求的，请把所选项前的字母填在题后的括号内；1. Visual Basic 程序中分隔一行中各语句的字符是（）； A) B) :C) D) _2. 以下可作为 Visual Basic 的变量名的是（）；A: FilenameB: A （ A B）C: A%DD :Print3. 要让菜单项无效，应将（）属性值设置为 False ；A. VisibleB.EnabledC. MoveableD.Checked4. 以下过程是（ ）大事；Prviate Sub

2、 Form_Load End SubA: 命令按钮的单击B: 命令按钮的装载C；窗体的装载D:窗体的单击5. Vb 中描述文件扩展名的是（）属性； A:DriveB:PatternC: FileNameD:Path6. 关于 Visual Basic 中大事的说法中，不正确的为（）；A) 大事是由 Visual Basic 预先定义好的，能够被对象识别的动作B) DblClick （双击）是 Visual Basic 中的一种大事C) 一个对象可以识别一个或多个大事D) 对于一个系统供应的对象可以识别哪些大事，需要程序员自己定义7. 以下控件中可设置滚动条是（）；A. 检查框（复选框）B. 框

3、架C. 文本框D. 标签框8. 在 Visual Basic中建立一个空窗体， 不会是其默认名；A. Form1B. Form2C. FormxD. Form109. Const One&=1 ，就 One 为（ ）类型的常数； A) 整型B) 字节型C) 长整型D) 单精度型10. 关于规律型数据，以下说法错误选项（）；A. 规律型数据只有两种可能值：True 或者 FalseB. 当把规律值转换为数值时False 转为 0， True 转为 116 / 9C. 当把其他类型数据转换为规律数据时，非0 数转换为 True，0 转换为 FalseD. 规律型数据以2 个字节储备11. 以下（

4、）不是 Visual Basic 的特点； A: 结构化程序设计B: 集成可视化程序开发环境C:大事驱动编程机制D: 可将用户的编程思想自动转换成程序代码12. 窗体的 load大事可以被用来实现的功能为（）； A:确定窗体的位置B:从内存中清晰一个窗体C: 在程序启动时对属性和变量初始化D:重画窗体13. 单复选框的控件名称为（）； A.OptionBottonB.CheckBoxC.PictureBoxD. Image14. 如要禁止窗体被移动，可设置窗体的（）属性为 False；A MoveableB: MoveC: MinButtonD: ControlBox15. 如要设置定时器的定

5、时间隔设为10 秒，应将（ ）属性值设为 10000；A. IntervalB. ValueC. EnabledD. Text16. 以下（）是文件夹列表框；A. DirListBoxB. DriveListBoxC. FileListBoxD. ComboBox17. 以下（ ）可从通用对话框的“字体”对话框中返回用户挑选的字体名；A. FileNameB. PathC. FontNameD. Color18. 以下哪个操作可以清除文本框对象Text1 的内容（ ）；A. Text1.Text=B. Text1.clsC. Text D. cls19. 要想通过单击Command1弹出 Fo

6、rm2 窗体，就可在Command1的单击大事中，使用（）命令；A. Load Form2B. Form2.ShowC. Form2.SetFocusD.Form2.PopupMenu20. 以下属性中只在运行时起作用的为（）；A. Caption属性B.Visible属性 C. BorderStyle属性 D.Picture属性21. 在运行时，如要使文本框获得输入焦点，可调用文本框对象的（）方法来实现；A. RefreshB. GetFocusC. SetFocusD. Tab22. 在窗体中利用 Print方法输出文本信息时，信息的输出位置由（）属性设置；A. LeftB. TopC.

7、x,yD. CurrentX,CurrentY23. 语句： Dim student10,5 to 100定义的是一个（）维数组；A. 2B.3C.5D.1024. 默认情形下，语句： Dim student10 to 11 ,4定义的数组有（）个元素；A. 20B.22C.10D.1125.已 知 Eng1=90 ， Math1=80， Comp1=95Total1=Eng1+Math1+Comp1， 就Total1=（ ）；A. 265B.90C.80D.9526.已知在“通用”代码有以下语句：Dim A As Integer就，在某一大事代码中使用（）是正确的；A. ReDim A30,

8、4B. ReDim A4 AsC. ReDim A100D. ReDim A 27. Int（ -23.512 ）的值为（ ）；A.-23B.-24C.24D.2328. 将 ASCII 码转换成字符串的函数是（）；A. Chr$B. Str$C. AscD. Val29. 表达式 MidBeijing2021,4,4的值是（）；A. BeijB. jingC. inj2D. 202130. A$=+3.14+2，就 Val （A$）的值为（ ）；A. +3.14+2B. +5.14C. 3.14D. 5.14二、填空题：请把答案填在题中横线上；1. Visual Basic中有一种控件组合了

9、文本框和列表框的特性, 这种控件是；2. Visual Basic供应的对数据文件的三种拜访方式为随机拜访方式,和二进制拜访方式；3. 为了能在运行时把d:pic文件夹下的图形a.jpg装入图片框 Picture1,所使用的语句为 ；4. 计时器控件能有规律的以肯定时间间隔触发 大事 , 并执行该大事过程中的程序代码；5. Visual Basic应用程序中标准模块文件的扩展名是 ；26. 与数学表达式 cos a+b 3+x+5对应的 Visual Basic表达式是.7. 要同时选定窗体上的多个控件, 可以按住或键, 然后依次单击窗体上的各控件.8. 在 Visual Basic中最基本的

10、对象是 .9. 要在 Visual Basic工程中添加一个新的窗体, 可以在主窗口的工具栏中挑选 按钮 .10. 在代码窗口中 , 输入某行代码并按回车键之后, 假如代码变成颜色 , 说明该行代码有语法错误 .三、程序改错：1.程序功能：已知 24 有 8 个正整数因子 即： 1,2,3,4,6,8,12,24，而 24 正好被其因子个数 8 整除；问 100,300之间有多少个这样的数；程序中有两行有错误；改正错误，使它能输出正确的结果； Private Sub Command1_Click Dim n1 As Integer, n2 As Integer Dim x As Integer

11、Dim i As Integer n2 = 0For x = 100 To 300n2 = 0For i = 1 To 100If x Mod i = 0 Then n1 = n1 + 1End If Next iIf x Mod n1 = 0 Then n2 = n2 + 1End IfNext x Print n2 End sub2. 程序功能：利用函数pd 运算 15000 之间能被 17 和 37 整除的数的个数；程序中有错误，改正错误，使程序能输出正确的结果；Private Sub Command1_ClickDim i As Integer Dim s As Integer s =

12、 0For i = 1 To 5000If pdi Then s = s + 1 Next iPrint s End SubPrivate Function pdx As Integer As Boolean If x Mod 17 = 0 Or x Mod 37 = 0 Thenpd = True Elsepd = FalseEnd IfEnd Fuction3. 程序功能：依据整型参数m，运算 100-999的平方根的倒数之和；程序的函数fun中有一行有错误，改正错误，使它能输出正确的结果；Private Sub Command1_ClickPrint Formatfun100, 999,

13、 #.# End SubPrivate Function funm As Integer, n As Integer As Single y = 0For i = m To n t = 1 / Sqriy = y + tNext i fun = tEnd Function四、程序填空题；1.士兵在演练过程中，队伍变换成10、21、35、60 行时，队形都能成为矩形；问参与演练的士兵最少有多少人？Private Sub Form_Click Dim a%, b%, c%, d%, n% a = 10b = 21c = 35d = 60n = 60Do While n = n + 1Loop Pr

14、int nEnd Sub2. 用 cosx 1 x2/2.+x4/4.- +-1n*x2n/2n.的公式求近似值，直到最终一项肯定值小于 0.00001 为止；设 x 7；Private Sub Form_clickDim x As Integer, i As Integer Dim xpower As SingleDim y As Singlex = ValInputBox 请输入 x： i = 0z = 1y = 1Do While Absz 0.00001 factor = 1i = i + 1For j = 1 To 2 * i factor = factor * j Next jxp

15、ower = x 2 * iy = y + z LoopPrint formaty, 0.# End Sub3. 已知一个数列的前3 项为 0， 0，1，从第 4 项开头，每项为前3 项的和，编程求此数列的第39个数；Private Sub Form_Click Dim i%, f0&, f1&, f2&, f3&FontSize = 14: FontBold = True f0 = 0f1 = 0f2 = 1For i =4 to 39f0 = f1 f1 = f2 f2 = f3 Next i Print f3 End Sub五、编程题：1、编写程序，验证输入的3 位正整数是否为同构数；X

16、 如显现在自己的平方数的末3 位，就 X 是同构数；如 625 的平方是 390625，就 625 为同构数；2. 设有如下两组数据：A:1 ， 2，3， 4， 5， 6， 7， 8, 9, 10 B:100, 99, 98, 97, 96, 95,94, 93, 92, 91,编写一个程序，把上面两级数据分别读入两个数组中，然后把两个数组中对应的元素相加，即1+100 10 91；并把相应的结果放入三个数组中，最终输出第3 个数组的值；3. 用 Circle方法画圆弧和椭圆弧；如下图所示；要求：中心点相同，圆弧长度和角度随机，颜色随机，圆弧数为 20；4. 在图片框中用PSet 方法随机地产

17、生如干个彩色的点；窗体上有3 个命令按钮：“画点”、“清除”、和“退出”；如下图所示；PSet 方法：对象名 . Pset Step （ x,y ），颜色六、问答题（ 15 分）1. 简述多文档及其特性；简述对话框的分类和特点；VB程序设计与应用答案一、挑选题：在每道题给出的四个选项中，只有哪一项符合题目要求的，请把所选项前的字母填在题后的括号内；12345BABCB678910DCCCD1112131415DCAAA1617181920ACAAB2122232425CDACA2627282930CBABC二、填空题：请把答案填在题中横线上；1. 组合框2. 次序拜访方式3. Picture1

18、.picture=LoadPicture“d:pica.jpg”4. Timer5. .bas6.cosa+b） 2/3*x+57. Shift Ctrl8. 窗体9. 添加窗体10. 红色三、程序改错题1. 第七行 n2 = 0改成 n1 = 0第八行For i = 1 To 100改成 For i = 1 To x2. 第十一行Or 改成And3. 第十行 fun = t改成 fun = y四、程序填空题1.a * 1000 + b * 100 + c * 10 + d * e = b * 1000 + c * 100 + d * 10 + e2.100 - i - j = 100 - 5

19、 * i - j * 23.c = i Mod 100 10五、编程题：1. 编程代码为：Private Sub Command1_Click Dim i, m As IntegerFor i = 100 To 999m = i * i Mod 1000 If i = m ThenPrint iEnd If Next i End Sub2. 编程代码Private Sub Command1_Click Dim a10, b, c10 As Integer For i = 1 To 10ai = i Next ib = Array100, 99, 98, 97, 96, 95, 94, 93,

20、92, 91For i = 1 To 10ci = ai + bi - 1 Print ciNext iEnd Sub3. 用 Circle方法画圆弧和椭圆弧；如下图所示；要求：中心点相同，圆弧长度和角度随机，颜色随机，圆弧数为 20；Private Sub Command2_Click pi = 3.1415926a1 = 0c = 1DrawWidth = 1For r = 100 To 2000 Step 100 a2 = a2 + pi / 2 Mod 2 * piCircle 1800, 1200, r, QBColorc, a1, a2 a1 = a1 + pi / 4c = c

21、+ 1DrawWidth = DrawWidth + 1 Next rEnd SubPrivate Sub Command3_Click ClsEnd Sub4. 编程代码为：Private Sub Command1_Click Picture1.DrawWidth = 10For i = 1 To 100r = Int256 * Rnd g = Int256 * Rnd b = Int256 * Rnd x = Rnd * Widthy = Rnd * HeightPicture1.PSet x, y, RGBr, g, b Next iEnd SubPrivate Sub Command2

22、_Click Picture1.ClsEnd SubPrivate Sub Command3_Click EndEnd Sub六、问答题 简述多文档及其特性；答：定义：多文档界面MDI ， Multiple Document Interface答应创建在单个容器窗体中包含多个窗体的应用程序；绝大多数基于Windows 的大型应用程序都是多文档界面，例如， Microsoft Word和 Microsoft Excel等；多文档界面可同时打开多个文档，它简化了文档 之间的信息交换；多文档界面有如下特性：（ 1） 全部子窗体均显示在MDI 窗体的工作区中；用户可以转变、移动子窗体的大小，但被限制在

23、 MDI 窗体中；（ 2） 当最小化子窗体时，它的图标将显示在MDI 窗体上，而不是在任务栏中；当最小化MDI 窗体时，全部的子窗体也被最小化，只有MDI 窗体的图标显现在任务栏中；（ 3） 当最大化一个子窗体时，它的标题与MDI 窗体的标题一起显示在MDI 窗体的标题栏上；（ 4） MDI 窗体和子窗体都可以有各自的菜单，当子窗体加载时掩盖MDI 窗体的菜单；2.简述对话框的分类和特点；答：分类：对话框分为3 种类型：预定义对话框、通用对话框和自定义对话框（ 1） 预定义对话框也称预制对话框，是由系统供应的；VB 供应了两种预定义对话框，即输入框和信息框 或消息框 ，前者用InputBox函

24、数建立，后者用MsgBox 函数建立，详细用法参见第 4 章；（ 2） 通用对话框是一种控件，用这种控件可以设计较为复杂的对话框；（ 3） 自定义对话框也称定制对话框，这种对话框由用户依据自己的需要进行定义；输入框和信息框尽管很简单建立，但在应用上有肯定的限制，许多情形下无法满意需要，用户可以依据详细需要建立自己的对话框；本章将介绍后两种对话框，即通用对话框和自定义对话框；特点：（ 1） 在一般情形下，用户没有必要转变对话框的大小，因此其边框是固定的；（ 2） 为了退出对话框，必需单击其中的某个按钮，不能通过单击对话框外部的某个地方关闭对话框；（ 3） 在对话框中不能有最大化按钮Max Button和最小化按钮 Min Button，以免被意外地扩大或缩成图标；（ 4） 对话框不是应用程序的主要工作区，只是暂时使用，使用后就必需关闭；3.