《VB程序设计》复习题
第 1 页 共 12 页 电大、自考、考研、大学期末、职称考试电大、自考、考研、大学期末、职称考试、 招聘招聘VBVB 程序设计复习题程序设计复习题 一、单项选择题一、单项选择题 1后缀为.frm 的文件表示（） 。 A类模块文件B窗体文件 C标准类模块文件D窗体二进制数据文件 2窗体的 Load 事件的触发时机是（） 。 A用户单击窗体时B窗体被加载时 C窗体显示之后D窗体被卸载时 3 与传统的程序设计语言相比， Visual Basic 最突出的特点是 （） 。 A结构化程序设计B程序开发环境 C事件驱动编程机制D程序调试技术 4无论何种控件，共同具有的属性是（） 。 AText 属性BCaption 属性CName 属性 DAutosize 属性 5有程序代码如下： Text1.Text = “VB 简单易学，功能强大“ 则 Text1、Text 、和“ VB 简单易学，功能强大“分别代表（） 。 A对象，值，属性B对象，属性，值 C对象，方法，属性D属性，对象，值 6刚建立一个新的标准 EXE 工程后，不在工具箱中出现的控件是 （） 。 A单选按纽B图片框 C框架D通用对话框 第 2 页 共 12 页 7. 如果要在文本框中键入字符时，只显示某个字符，如星号（*）, 应设置文本框的（）属性。 ACaptionBPasswordCharCText DChar 8如果对象的名称为 Mytext，而且对象有一个属性 Text，那么在代 码中引用该属性的正确格式是（） 。 AText.MytextBMytext.Text CMytext.(Text)DMytext*Text 9将数据项“China”添加到列表框 List1 中成为第一项，应使用的 语句是（） 。 AList1.AddItem“China“,0BList1.AddItem“China“,1 CList1.AddItem“China“,DList1.AddItem“1,China“ 10要在窗体的标题栏内显示“欢迎您！ ” ，使用的语句是（） 。 AForm.caption=“欢迎您!“BForm1.caption=“欢迎您!“ CForm1.print “欢迎您!“DForm. print “欢迎您!“ 11下列关于窗体的说法不正确的是（） 。 A窗体的标题由 Caption 属性确定 B窗体的 Name 属性与 Caption 属性相同 C窗体的背景图片由其 Picture 属性设定 D通过设置 Icon 属性可使窗体获得最小化时的图标 12在 Visual Basic 中，窗体文件的扩展名为（） 。 A.vbpB.frm C.clsD.bas 13将一个 VB 程序保存在磁盘上，至少会产生的文件是（） 。 A.doc、.txtB.txt、.exe C.vbp、.frmD.bat、.frm 第 3 页 共 12 页 14如果对象的名称为 Mytext，而且对象有一个属性 Text，那么在代 码中引用该属性的正确格式是（） AText.MytextBMytext.Text CMytext.(Text)DMytext*Text 15将调试通过的工程经“文件”菜单的“生成.exe 文件”编译成.exe 后，将该可执行文件拿到其它机器上不能运行的主要原因是（） 。 A缺少.frm 窗体文件B该可执行文件有病毒 C运行的机器上无 VB 系统D以上原因都不对 16关于对象的属性不正确的是（） 。 A对象的属性一般有属性名和属性值B可通过属性窗口设置 属性的值 C可通过程序代码设置属性的值D对象的所有属性值均 可在设计时设计 17后缀为.vbp 的文件表示 VB 的（） 。 A窗体文件B工程文件 C类模块文件D标准类模块文件 18在设计阶段，双击窗体上的某个控件时，打开的窗体是（） 。 A工程资源管理器窗口B工具箱窗口 C代码编辑器窗口D属性窗口 19要在窗体的标题内显示“我的第一个应用程序”,使用的语句是 （） 。 AForm1.Print“我的第一个应用程序“ BForm.Print“我的第一个应用程序“ CForm.caption=“我的第一个应用程序“ DForm1.caption=“我的第一个应用程序“ 20下列符号不能作为 VB 中变量名的是（） 。 第 4 页 共 12 页 AABCDBX00000C60XYZDxyz 二、填空题二、填空题 1要在窗体 Form1 内显示“myfrm” ，使用的语句 是。 2. 在 VB 中， 要想获得某个相关控件或语句的帮助信息， 一般可首先 选中该控件或语句，然后按键。 3表达式 8+13 Mod 2*4+3 的值是。 4要想在代码中给名为 txtshow 的文本框赋予文本：GOOD WORK！ 时，应当编写的语句是。 5若窗体 Form1 左上角坐标为（0，600） ，右下角的坐标为（800， -200） 。则 X 轴的正向向，Y 轴的正向向。 6全局变量在整个应用程序中有效，一般在标准模块中使用 语句声明。 7为了在运行时把当前路径下的图形文件 picturefile.jpg 装入图片框 Picture1，所使用的语句为。 8表达式 14/2-23*7 MOD 6 的值是。 9. 将图片框的 AutoSize 属性设置成时， 可使图片框根据 图片调整大小。 10. 当进入 VB 集成开发环境后，发现没有显示“工具箱”窗口，应 选择菜单的选项，使“工具箱”窗口显示。 11. 欲设置定时器的时间间隔为 2 秒，则属性 Interval 的值 为。 12定时器（Timer）控件可识别的事件是，发生该事件的 时间间隔由定时器的属性设置，其单位为。 13列表框中项目的序号是从开始的。 第 5 页 共 12 页 14控件数组的名字由属性指定， 而数组中的每个元素由属性决定。 15表达式 3+ 10 Mod 23 + 2 的值是。 三、三、写出程序运行结果写出程序运行结果 1Private Sub Form_Click() Dim xAs Integer Static yAs Integer x = x + 3 y = y + 4 Form1.Print “x=“; x, “y=“; y End Sub 写出程序运行时连续单击三次窗体后， Form1 上的输出结果。 2 Private Sub Command1_Click() Dim Sum1 As Integer, Sum2 As Integer Sum1 = 0: Sum2 = 1 For i = 1 To 3 第 6 页 共 12 页 For j = 1 To i Sum2 = Sum2 * j Next j Sum1 = Sum1 + Sum2 Next i Print Sum1 End Sub 写出程序运行时单击 Command1 按纽后，Form1 上的输出结果。 3Private Sub Form_Click() Dim iAs Integer, kAs Integer, cAs Integer For i = 1 To 5 If i Mod 2 = 0 Then k = k + 2 Else c = c + 3 第 7 页 共 12 页 End If Next i Print k, c End Sub 写出程序运行时单击窗体后，Form1 上的输出结果。 4Private Sub Command1_Click() DimA(1 To 5)As Integer Dim bAs Integer For b = 1 To 5 A(b) = b Next b Text1.Text =A(b - 2) End Sub 写出程序运行时单击 Command1 按纽后，Text1 上的输出结果。 5Private Sub Command1_Click() 第 8 页 共 12 页 Dim x As Integer Static s As Integer x = Val(InputBox(“请输入一个正整数=“) If x 3 Then c = c + 5 Exit For Else k = k + 5 End If Next j Print c, k End Sub 写出程序运行时单击窗体后，Form1 上的输出结果。 第 11 页 共 12 页 四、四、编程题编程题 1编写一程序，要求单击“开始”按钮(Command1)，在列表框 (List1)中输出 200300 之间不能被 5 整除的数，单击清除按钮 (Command2)，清除文本框中的全部内容。程序运行结果如图 所示。 图 2列表框应用程序。要求从文本框中输入课程名称，然后按“添加” 按钮， 把课程名称添加到列表框中； 当选择列表框中某一项时， 按 “删 除”按钮，从列表框中删除；当选择列表框中某一项时，按“修改” 按钮，把列表框中选取的项送往文本框且“修改”按钮变为“修改确 认” 。在文本框的内容修改好后，按“修改确认”按钮，再把文本框 中修改后的信息送到列表框且“修改确认”按钮变为“修改” 。程序 运行结果如图 所示。 第 12 页 共 12 页 图 3、在窗体上添加一个文本框和两个命令按钮，并把两个命令按钮 的标题分别色绘制为“隐藏文本框”和“显示文本框” 。当单击第一 个命令按钮时，文本框消失；而当单击第二个命令按钮时，文本框重 新出现，并在文本框显示“VB 程序设计” （字体大小为 16） 。程序运 行界面如图 所示。 图 4、输出 100200 之间不能被 3 整除的数，要求用 Do 语句的一 种形式实现，程序运行结果如图 所示。 图
