Visual Basic程序设计课程辅导

Visual Basic程序设计课程辅导——第3章第3章应用程序接口设计及代码编写本章以一个简单的计算器应用程序为实例，围绕VB应用程序界面设计和代码设计，较系统地分析了可视化编程的步骤，介绍了可视化界面设计方法、菜单设计及窗体设计的原则、各种常用控件的用法，以及工程化思想和VB结构化程序设计知识。

通过本章学习，你应该能够达到如下学习目标：1．掌握可视化界面设计的方法2. 掌握变量和常量的概念及用法3．掌握运算符及流程控制语句的用法4．理解工程化思想和编程风格5．理解常用函数的使用方法6．了解窗体设计的基本原则7．了解“简单计算器”程序设计过程从“简单的计算器”应用程序开发入手，学习本章内容。

主要知识点分析1．多窗体程序设计多窗体应用程序界面设计的一般步骤是：（1）添加应用程序所需的所有的窗体、模块。

（2）设置起动窗体，以及多窗体间的调用关系。

（3）按单窗体设计方法设计每个窗体。

2．MDI 多文档窗体的设置方法MDI父窗体、MDI子窗体的设置及显示方法，见教材p61页3．窗体的运行模式模态和非模态显示最前端显示ToolWindow窗体显示4．菜单设计利用菜单编辑器（如图3.1所示）可以设计菜单。

在VB应用程序中，菜单是一个控件，与其他控件一样，它具有定义其外观和行为的属性，在设计或运行时可以进行设置或调用。

菜单控件的主要属性：菜单控件的主要属性菜单控件的事件：菜单控件只有一个事件，即Click 事件。

菜单有下拉式菜单和弹出式菜单，在创建弹出式菜单时，可以将菜单的“可见”属性设置为 False ，这样在窗口顶部菜单栏中将不显示该菜单，但仍然可以使用PopupMenu 方法显示弹出菜单。

通过实验3应熟练掌握这两类菜单的创建方法。

并通过创建工具栏掌握ToolBar 、ImageList 和StatusBar 控件的用法。

5．单选钮和复选框控件图3.2 菜单编辑器数据区 编辑区单选纽和复选框的主要属性单选纽和复选框控件的主要事件是Click事件。

6．列表框和组合框控件列表框和组合框控件的常用属性列表框和组合框控件的常用方法：AddItem方法：用于将项目添加到列表框或组合框控件。

Clear方法：用来删除列表框和组合框中的所有项目。

RemoveItem：用于从列表框或组合框中删除一项。

列表框和组合框控件的常用事件：Click事件7．通用对话框控件通用对话框控件CommonDialog是一组标准对话框，它提供打开和保存文件、设置打印选项、选择颜色和字体等操作。

通过选择“工程—部件”中的”Microsoft Common Dialog Control6.0(SP3)”可以将CommonDialog控件添加到工具箱中，然后放置在需要的窗体，设置其属性。

8．变量的有关概念变量是指在程序运行期间其值可以变化的量。

变量具有名字和数据类型两个特性。

变量的名字用于在程序中标识变量和使用变量的值，数据类型则标识变量中能保存哪种类型的数据。

一个变量在一个时刻只能存放一个值，当新的数据存放到变量中时，原来的数据就不再存在。

变量声明的方法有显式声明和隐性声明，在编写代码时最好对每个变量都进行显式声明。

任何变量在被声明后均会有一个初始值。

一般情况下，数值型变量的初始值为0，字符串变量初始值为空字符串，即""，变体型变量初始值为空值，即Null值。

布尔型的初值为假，即False。

当空值的变体变量在表达式中参加运算时，系统会根据实际情况将其解释为0或空字符串。

9．变量的作用域和变量的生命周期变量的作用域是指变量的有效作用期间，在有效区间内，变量能够被程序访问，其值能够被程序调用；变量的生命周期是指能够保存变量值的时间段。

二者都可以从过程级变量、窗体级和模块级变量、全局变量来理解并加以区分。

VB提供三类模块，即窗体模块、标准模块和类模块。

VB的所有代码都存储在模块中。

窗体模块是大多数VB应用程序的基础，对于只包括一个窗体的应用程序，程序的所有代码都存储在窗体模块中，对于具有多个窗体的程序时，可能在几个窗体中都有要执行的公共代码，为了避免两个窗体中出现重复代码，可以创建一个标准模块，在其中包含实现公共代码的过程。

过程级变量也称局部变量，是指在过程内部声明的变量，其作用域是过程内部，只有在该过程中的代码才能访问这个变量，不能应用于程序的其它部分，其生命周期是指该变量在过程执行期间才存在，当过程执行结束时，过程级变量的值不再保留，它所占的内存空间也被释放，直到下一次调用该过程时，才重新给该变量分配存储空间，赋予新值，这时该变量的另一个生命周期又开始了。

该变量在过程中用Dim关键字来声明。

应当特别注意的是静态变量属于过程级变量，尽管在过程外不能访问它，但静态变量在整个程序运行期却一直存在着，即使过程结束，变量的值也仍然保留着。

窗体级和模块级变量是指在窗体或模块内部声明的变量，其作用域是整个窗体或模块。

只有在该窗体或模块中的代码才能访问这个变量，离开这个模块或窗体，该变量就不起作用了，例如窗体Form1模块中的变量不能用于窗体Form2模块。

该变量的生命周期是整个窗体或模块，在窗体模块代码编辑器的顶部用Private关键字声明。

全局变量也称模块公有变量，是指在整个应用程序都可以使用的变量，该变量在任何时段都存在着，是一种无时无刻不在的变量，在标准模块代码编辑器的顶部用Public关键字声明。

10．数据类型VB6.0定义了11种数据类型，它们是整型、长整型、单精度浮点型、双精度浮点型、货币型、字节型、字符串型、布尔型、日期型、变体型和对象型。

11．运算符和表达式VB中有四种类型的运算符，即算术运算符、关系运算符、逻辑运行符和字符串连接符。

（（2）关系运算符和关系表达式关系运算符用于对两个表达式的值进行比较，比较的结果为布尔值True (真)或False （假）。

关系运算符（3）逻辑运算符和逻辑表达式逻辑运算符两边的表达式要求为布尔值。

逻辑表达式的结果值仍为布尔值。

(4) 字符串连接符字符串运算符有两个：“&”、“+”，其作用都是将两个字符串连接起来，合并成一个新的字符串。

“&”会自动将非字符串类型的数据转换成字符串后再进行连接，而“+”则不能自动转换。

例如：“Hello”&”World”结果为” Hello World”“Check”&123 结果为” Check123”“Check”+123 错误Visual Basic表达式中运算符的优先级是：算术运算符→关系运算符→逻辑运算符例如：设a=3,b=5,c= -1,d=7,则以下表达式按标注①~⑩的顺序进行运算。

a+b > c+d And a>=5 Or Not c>0 Or d<0①8 ②6 ④False ⑤False ⑥False③True ⑦True⑧False⑨True⑩注意：当运算符优先级相同时，按照它们从左到右出现的顺序进行计算。

可以用括号改变优先顺序，括号内的运算总是优先于括号外的运算。

但在括号之内，运算符的优先顺序不变。

12．常用函数（1）数值型函数{2}字符串函数字符串函数{3}日期函数日期函数13．流程控件语句（1）顺序结构顺序结构是最简单和最基本的结构，当执行顺序结构时，将按照语句在程序中的先后顺序依次执行。

其特点是流程直观易读，结构简明。

通常将赋值语句、注释语句、Print方法、InputBox函数、MsgBox函数等归纳在顺序结构中。

（2）选择结构第一种选择结构：I f…Then…Else语句根据功能不同，I f…Then…Else语句又有以下5种形式：① I f…Then语句格式：If 条件表达式 Then 单语句功能：如果条件表达式为真（True）时，程序执行后面的单语句。

例如：a = 40b = 50If a = b Then Print "相等"此例中，a不等于b，因此不执行Print "相等" 语句。

② I f…Then…End If语句（单分之结构）格式：If 条件表达式 Then一组语句End If功能：如果条件表达式为真（True）时，程序执行Then和End If之间的一组语句。

注意：一组语句是由多个语句组成，但允许只有一个语句的情况，End If语句不能少。

例如：下面的两组语句是等价的If a = b Then Print "相等"或If a = b ThenPrint "相等"End If③ I f…Then…Else…End If语句（双分之结构）格式：If 条件表达式 Then第一组语句Else第二组语句End If功能：当条件表达式为真，则执行第一组语句，否则执行第二组语句。

例如：Private Sub Form_Load()Dim a As Integer, b As Integera = 40b = 50If a > b ThenPrint "大数是:"; aElsePrint "大数是:"; bEnd IfEnd Sub④ I f…Then…Else…End If语句（多分之结构，If语句的嵌套形式之一）格式：If 条件表达式1 ThenIf 条件表达式2 then语句块1Else语句块2End IfElseIf 条件表达式3 Then语句块3Else语句块4End IfEnd If功能：条件表达式1为真时，判断条件表达式2，否则判断条件表达式3。

如果条件表达式2为真则执行语句块1，否则执行语句块2。

⑤ I f…Then…ElseIf…then…Else…End If语句（多分之结构，If语句的嵌套形式之二）格式：If 条件表达式1 Then语句块1ElseIf 条件表达式2 Then语句块2ElseIf 条件表达式3 Then…ElseIf 条件表达式n Then语句块nElse语句块n+1End If功能：如果条件表达式1为真则执行语句块1，否则判断条件表达式2，如果条件表达式2为真则执行语句块2，否则判断条件表达式3，依次类推。

注意：该条件判断语句只能执行一个语句组，即有一个条件表达式为真后，不在进行其它的判断，而直接跳出整个条件判断语句，执行End If后面的程序。

例如：Private Sub Form_Click()Dim a As Integer, b As Integera = 40b = 50If a = b ThenPrint " 相等"ElseIf a > b ThenPrint " a > b"ElsePrint "a < b"End IfEnd Sub第二种选择结构：Select Case当条件表达式只有一个变量时，采用Select Case语句会比If…Then…Else语句更简洁、易读，程序执行效率更快。