1、VB笔试章节练习试卷 24及答案与解析 1 在 C:Pic文件中有一个图形文件，名为 WelcomE gif。为了将该图形装入名为Form1的窗体，应使用的语句为 _。 （ A） Form1.Caption = “WELCOME gif“ （ B） Form1.Caption = C:PicWelcomE gif“ （ C） Form1.Caption = “C:PicWelcomE gif“ （ D） Form1.Caption = LoadPicture(“C:PicWelcomE gif“) 2 在窗体上画一个文本框控件，名称为 TxtTime；再画一个计时器控件，名称为Timer1，程
2、序运行后，要求每 1秒钟在文本框中显示一次当前的事件。以下是实现上述操作的程序，则在下划线后 (括号前 )应填入的内容是 _。 Private Sub Timer1 () TxtTimE text = Time End Sub （ A） Enabled （ B） Visible （ C） Interval （ D） Timer 3 下列可以把当前目录下的图形文件 pic1.jpg装 入图片框 Picture1中的语句为A Picture = “pic1.jpg“ （ A） Pictur （ B） Handle = “pic1.jpg“ （ C） Picture1.Picture = LoadP
3、icture(“pic1.jpg“) （ D） Picture=LoadPicture(“pic1.jpg“) 4 在窗体 (Name属性为 Form1)上画两个文本框 (其 Name属性分别为 Text1和 Text2)和一个命令按钮 (Name属性为 Command1)，然后编写如下两个事件过程： Private Sub Command1_Click() a = Text1.Text + Text2.Text Print a End Sub Private Sub Form Lead() TextText = “ “ TextText = “ “ End Sub 程序运行后，在第一个文本框
4、 (Text1)和第二个文本框 (Text2)中分别输入 123和 321，然后单击命令按钮，则输出结果为 _。 （ A） 444 （ B） 321123 （ C） 123321 （ D） 132231 5 设有名称为 VScrolll的垂直滚动条，其 Max属性为 100， Min属性为 50，则能正确设置滚动条 Value属性的语句是 _。 （ A） VScrolll.Value= 100 （ B） VScrolll.Value= 30 （ C） VScrolll.Value = 4 * 30 （ D） VScrolll.Value = -100 - 50 6 在窗体上画一个名称为 Com
5、mand1的命令按钮和 3个名称分别为 Labe11、Labe12、 Labe13的标签，然后编写如下代码： Private x As Integer Private Sub Command1_Click() State y As Integer Dim z As Integer n = 10 z = n+z y = y+z x = x+z Labe11.Caption = x Labe11.Caption = y Labe11.Caption = z End Sub程序运行后，连续 3次单击命令按钮，则 3个标签框中显示的内容分别是 _。 （ A） 10 10 10 （ B） 30 30 3
6、0 （ C） 30 30 10 （ D） 10 30 30 7 在窗体上画一个单选按钮和一个复选框，其名称分别为 Option1和 Check1，然后编写如下事件过程： Private Sub Option1_Click() Check1.Value = Option1.Value End Sub 程序运行后，如果单击单选按钮，其结 果为 _。 （ A）单选按钮与复选框的选中情况一致 （ B）出错 （ C）如果选中单选按钮 Option1，则复选框 Check1也被选中 （ D）如果不选中单选按钮 Option1，则复选框 Check1也不被选中 8 设组合框 Combol中有 3个列表项，为
7、了删除其最后一项，应使用的语句是_。 （ A） Combol.RemoveItem Combo1. ListCount （ B） Combol.RemoveItem 3 （ C） Combol.RemoveItem Combol. ListCount-1 （ D） Combol.RemoveItem Combol. Text 9 在窗体上画三个命令按钮，其名称分别为 Command1、 Command2和Command3，然后编写如下事件过程： Private Sub Command1 Click() Command2.Enabled = False Command3.Visible = Fa
8、lse End Sub程序运行后，单击命令按钮 Command1，则执行的操作是 _。 （ A）命令按钮 Command2和 Command3禁用 （ B）命令按钮 Command2和 Command3隐藏 （ C）命令按钮 Command2隐藏， Command3禁用 （ D）命令按钮 Command2禁用， Command3隐藏 10 在窗体上画一个组合框、一个命令按钮和一个文本框，其名称分别为 Combol和 Text1，然后编写如下事件过程： Private Sub Form_Load() Combol.AddItem “AAAAA“ Combol.AddItem “BBBBB“ Co
9、mbol.AddItem “CCCCC“ Combol.AddItem “DDDDD“ Combol.AddItem “EEEEE“ End Sub 程序运行后， 如果单击命令按钮，则在文本框中显示组合框的项目， “CCCCC“。为了实现该操作，在命令按钮的 Click事件过程中应使用的语句为 _。 （ A） Text1 Text=Combol List(2) （ B） Text1 Text=Combol Text （ C） Text1 Text=Combol List(3) （ D） Text1 Text=Combol ListIndex 11 执行以下程序段，如果在对话框中输入 8，输出结
10、果是 “Hello“的是 _。 （ A） n = InputBox(“请输 入一个数 “) Select Case n Case 7 To 1 Print “Hello“ End Select （ B） n = InputBox(“请输入一个数 “) Select Case n Case Is 1, Is 6 Print “Hello“ End Select （ C） n = InputBox(“请输入一个数 “) Select Case n Case Is 5, 1, 3 To 10 Print “Hello“ End Select （ D） n=InputBox(“请输入一个数 “) Se
11、lect Case n Case 1, 5, Is 9 Print “Hello“ End Select 12 下列程序段的执行结果为 _。 Private Sub Command1_Click() n = 0 For a = 1 To 20 For b = 1 To 20 For c = 1 To 20 If a * a + b * b - c * c Then n=n+l End If Next c Next b Next a Print n End Sub （ A） 9 （ B） 12 （ C） 10 （ D） 11 13 程序设计风格是指 编写程序时所表现出的特点、习惯和【 】。 14
12、 结构化程序设计方法的原则要求对复杂问题应设计一些【 】作过渡，然后逐步细化。 15 结构化程序设计原则和方法中要求对语言中所没有的控制结构，应该采用【 】的方法来模拟。 16 一个消息由三个部分组成：接收消息的对象的名称、【 】和零个或多个参数。 17 程序有顺序、重复和条件三种基本控制结构，它们的共同特点是只有一个入口和【 】个出口。 18 采用结构化程序设计方法编写程序，可使程序结构良好、易读、易理解和【 】。 19 【 】的本质是主张从客观世界固有的事物出发来构造系统，提倡用人们在现实生活中常用的思维方法来认识、理解和描述客观事物，强调最终建立的系统能够映射问题域。 20 在结构化程序
13、设计思想提出来以前，在程序设计中曾强调程序的效率。现在与程序的效率相比，人们更重视程序的【 】。 21 面向对象的方法中，核心是【 】，它具有理想的模块机制，独立性好。 22 使得面向对象的方法开发的软件可维护性好的主要原因有：面向对象的方法开发的软件的稳定性比较好，容易修改、理解和易于【 】。 23 创建一个窗体， 在该窗体中建立两个按钮，分别命名为 Command1和Command2。下列程序代码用于实现以下功能：单击命令按钮 Command1后，按钮Command1变为不可用，而 Cmmnand2设置为可用。请填空。 Private Sub Command1_ Click() Comma
14、nd1._ = False Command1._ = True End Sub 24 创建一个工程，该工程包含两个窗体，名字分别为 Form1和 Form2。下列程序代码用于实现以下功能：单击命令按钮 Command1后 ， Form1窗体消失，显示Form2，并且 Form2中按钮 Command2变为可用。请填空。 Private Sub Command1_ Click() _Me Form2_ CommandEnable = True End Sub VB笔试章节练习试卷 24答案与解析 1 【正确答案】 D 2 【正确答案】 D 3 【正确答案】 C 4 【正确答案】 C 5 【正确答
15、案】 A 6 【正确答案】 C 7 【正确答案】 B 8 【正确答案】 C 9 【正 确答案】 D 10 【正确答案】 A 11 【正确答案】 C 12 【正确答案】 B 13 【正确答案】 逻辑思路 14 【正确答案】 子目标 15 【正确答案】 前后一致 16 【正确答案】 消息标识符 (消息名 ) 17 【正确答案】 一 18 【正确答案】 易维护 19 【正确答案】 面向对象方法 20 【正确答案】 可理解性 (清晰性 ) 21 【正确答案】 类 (对象 ) 22 【正确答案】 测试和调试 23 【正确答案】 Enable , Enable 24 【正确答案】 Unload , Show
