Visual Basic程序设计综合教程 教学课件 作者 田春婷 主编 第7章 过程.ppt

尚辅网 尚辅网  第7章 过程 在一个程序中，如果需要在多处执行完成同一功能的程序段，那么，重复书写一相同的程序段，是一项相当繁琐且容易出错的工作。能否对这样的程序段只书写一次而又多次调用呢？ Visual Basic提供了设计过程和自定义函数的功能，利用过程和自定义函数就能满足以上的需要。把需要在多处重复使用的程序段编写成一个相对独立的程序模块，这个程序模块就称为过程或自定义函数。这样，在一个程序中，需要完成这个程序模块功能的地方就不用再重复编制程序了，而是通过调用该过程或用户自定义函数来完成，这就是“结构化”程序设计的思想。  结构化程序设计思想的重点之一就是对一个复杂的问题采用“分而治之”的策略—模块化，把一个较大的程序划分为若干个模块，每个模块只完成一个或若干个功能。使用“过程”是实现结构化程序设计思想的重要方法。。  【主要内容】 本章要求用户重点掌握以下内容。 Sub过程和Function过程的定义格式。 Sub过程和Function过程的调用。 重点掌握Sub过程和Function过程中参数的传递方式，掌握值传递和地址传递的区别，并能灵活应用。 了解Shell函数的使用。  7.1 引例 【引例】 在名称为Form1的窗体画两个名称分别为Command1和Command2，外观属性分别为“输入成绩”和“成绩处理”的命令按钮，四个标签分别作提示性的说明，通过四个文本框分别用来输出数据，从键盘输入10个学生的成绩，求他们的平均成绩，最高分，最低分，并从高到低排名。程序的运行界面如图7.1所示。   分析: 在【引例】中，要求用户完成五项功能：输入10个学生的成绩，求平均成绩，最高分，最低分，排名。当然，这五项功能可以编写在一个事件过程中完成，但程序显得很复杂，如果把程序分成几个独立功能模块来完成，而由主程序调用，程序结构就显得比较清晰，容易调试和修改。  程序设计步骤 (1) 设计用户界面图7.2 【引例】设计界面 根据题目的分析，设计如图7.2所示用户界面。  （2）属性设置 各相关控件的属性设置见表7.1。  完成属性设置的用户界面如图7.3所示。  (3) 编写程序代码 在窗体模块中定义数组stscore(1 To 10)，全局变量的定义 Dim stscore(1 To 10) As Single 初始化输出控件 Private Sub Form_Load() Text1 = 初始化输出控件,使文本框的初始内容为空 Text2 = Text3 = Text4 = End Sub  输入10个学生的成绩 Private Sub Command1_Click() For i = 1 To 10 stscore(i) = InputBox(请输入学生的成绩) Next i End Sub  对成绩进行处理 Private Sub Command2_Click() st_sum 调用st_sum过程 Max_min 调用Max_min过程 sort 调用sort过程 End Sub  编写求平均成绩过程st_sum Public Sub st_sum() For i = 1 To 10 Sum = Sum + stscore(i) Next i Text3 = Sum / 10 在文本框中输出 End Sub 编写求最高，最低成绩过程Max_min Public Sub Max_min() Max = stscore(1) Min = stscore(1) For i = 1 To 10 If Max stscore(i) Then Max = stscore(i) If Min stscore(i) Then Min = stscore(i) Next i Text1 = Max 在文本框中输出 Text2 = Min 在文本框中输出 End Sub  编写排名过程sort Public Sub sort() For i = 1 To 9 For j = i + 1 To 10 If stscore(i) stscore(j) Then t = stscore(i): stscore(i) = stscore(j): stscore(j) = t End If Next j Next i