可视化程序设计(VB).docVIP

可视化程序设计(VB)复习题 一、简答题 1、叙述建立一个完整的VB程序的过程。 建立一个完整的VB应用程序的步骤如下：①新建工程②设计用户界面：确定窗体，在窗体中添加控件。③设置对象的属性：窗体和控件的属性在属性窗口设置。④编写有关的代码程序。⑤调试：若窗体或程序有错，则重复前三步，直到程序完全正确及窗体令人满意为止。⑥应用程序的集成和管理（存储项目）：把有关项目存储起来，以便以后使用。⑦运行应用程序。⑧建立可执行文件：脱离VB，而直接在Windows环境下运行。⑨结束项目。 2、简述过程的作用域。 过程的作用域有窗体/模块级和全局级。 窗体/模块级：指在某个窗体或标准模块内定义的过程，定义的子过程或函数过程前加班Private关键字，过程只能被本窗体或本标准模块中的过程调用。 全局级：指在窗体或标准模块中定义的过程，其默认是全局的，也可加Public进行说明，全局级过程可供该应用程序的所有窗体和所有标准模块中的过程调用。 3、简述事件驱动模型的编程机制 VB是按照事件驱动模型编写应用程序，即为每一种可能发生的事件编写一段代码。当事件发生时，计算机就执行该事件的代码段。事件的发生可以是用户操作所致，也可以是程序运行过程中引发的。 4、举例说明标签和文本框的区别。 共同点可以在窗体上显示文字，不同点：标签的内容在caption属性内，在窗体只能显示文字不能修编辑；文本框的内容在text属性内，在窗体上可直接对内容进行修改。 5、分析下面函数实现的功能。 Function F1(b As Integer) If b Mod 2 = 0 Then F1 = 0 Else F1 = 1 End If End Function 功能就是判断b是偶数还是奇数 函数过程F1实现的功能是：如果参数b为奇数，则返回值为1，否则返回值为0。 6、分析下面程序完成的功能。 Private Sub Commandl_C1ick() For i＝1 To 20 x＝Int(Rnd *200+100) If x Mod 5 ＝0 Then Print x S＝S+x End If Next i Print “Sum＝”：S End Sub 功能输出几个可以被5整除的随机数，并且求和。Commandl_C1ick()执行的过程是：首先通过循环生成20个200到300之间的随机整数，输出其中能被5整除的数并求出它们的和。 7、下面程序的功能是进行sum=1+2+3+…+100的求和计算，根据题意，完善程序。 Private Sub Command1_Click() Dim i As Integer, sum As Integer i = 1 （1） sum=0 Do While （2） i100 sum = sum + I i = i + 1 （3） Loop Label2.Caption = Str(sum) End Sub 8、下面Command1_Click()的功能是进行n!（n由键盘读入）计算，根据题意，完善程序。 Private Sub Command1_Click() Dim n As Integer, i As Integer Dim result As （1） Integer result = 1 n = （2） int（Text1.text ） If n = 0 Then Label2.Caption = 请输入正整数！ Exit Sub 结束过程 End If For i = 1 To n （3） result=result*（n-（i-1） ） Next I Label2.Caption = Str(n) + != + Str(result) End Sub 9、下面程序的功能是建立一个含有5个元素的数组，查找并输出该数组中元素的最大值。根据题意，完善程序。 Option Base 1 Private Sub Command1_Click() Dim arr1, Max as （1）integer arr1 = A