过程的创建和使用

“过程”就是***一个功能相对独立***的程序逻辑单元，即一段独立的程序代码，VB应用程序一般都是由过程组成的

VB过程分为事件过程和通用过程
事件过程是当发生某个事件（如鼠标单击时间内等）时，对该事件作出响应的程序段；
***通用***过程是供多个事件过程或其它过程调用的一段相同的程序代码，可以单独建立；
***（关键词“通用”，他是供其它过程调用，单独建立，可以建立在一个库中（类模块）形成自己的程序库，提高编程效率）***
通用过程分为子过程（SUB过程），函数过程（Function过程）和属性过程（Property过程）

• Sub过程不返回值“指的是不能通过过程名返回值，但可以通过参数返回值，并可以返回多个值见下面标记”
• Function过程返回一个值“指的是可以通过过程名返回值，但只能返回一个值”
• Property过程可以返回和设置窗体、标准模块 以及类模块，也可以设置对象的属性

实列：如何调用类中的过程（方法）
1.窗体

2.窗体代码
Private Sub Command1_Click() '建立一个单击事件，以下为整个事件过程
Set myobject = New Class1
'创建类Class1中的一个对象myobject,这个对象中的变量Name已变为私有变量，需要加前缀object变为myobject.Name才能使用==“实例化，理解为将类拷贝一个出来成一个新的对象，该对象具有原类中所有的变量，方法（sub子程序）等”
'如此程序中的变量myobject.Name即是类Class1中的变量，此程序中的"逆转功能myobject.ReverseName"方法就是Class1中的ReverseName方法==
myobject.Name = Text1.Text '给该对象object的变量Name附初值
myobject.ReverseName '调用myobject中的ReverseName方法完成字符串逆转
Text2.Text = myobject.Name '将变量Name值返回
'子过程通过变量返回值得方法就是此句，可以通过多个变量返回多个值
End Sub

3.类模块Class1代码
Option Explicit
Public Name As String '定义全局变量

'此过程功能是将字符串逆转
Public Sub ReverseName()
Dim i As Integer
Dim str As String
For i = 1 To Len(Name)
str = Mid$(Name, i, 1) & str
Next
Name = str
End Sub

4.此类模块中ReverseName()过程（方法）的功能

以上实列摘录自百度文库 https://wenku.baidu.com/view/d991520c7cd184254b35358d