VB6当中自定义过程和函数以及参数类型VIP专享

下载后可任意编辑VB6 当中自定义过程和函数以及的参数类型近日，接连看到有关在 VB6 中自定义过程和函数中的参数的类型问题，于是产生一种冲动，想写一篇比较全面的相关文章。文章的名就叫《VB6 当中自定义过程和函数的参数类型》好了。 一．自定义过程和函数：为什么要提供让用户自己定义具有特别功能的过程和函数呢？我们来看一个例子；在编写一个具体的应用项目的时候，可能需要在多个地方输出打印一行 60 个符号“*”，即：************************************************************以此作为分隔线。输出打印的代码如下：Dim i As IntegerFor i = 1 To 60 Print “*”;Next iPrint由于在多处地方需要输出这行符号，所以在多个地方会出现完全相同的代码，为了减少代码重复，我们就可以自己编写一个过程，该过程就是能够完成输出一行“*”号的工作；该过程的代码如下： 1．编写自定义过程：Private Sub PLine()Dim i As IntegerFor i = 1 To 60 Print “*”;Next iPrintEnd Sub从上面的代码中可以体会，过程的格式由；Private Sub Pline() 开始，End Sub 结束。开始部分由四部分组成；Private ---- 定义该过程的使用范围，类似定义变量前的引导字，定义过程可以用：Private、Public、Friend 三种关键字，分别表示在：窗体、模块和类模块中使用。Sub ---- 表示为过程，相应 Function 表示为函数。PLine ---- 是自定义过程的名称。() ---- 一对括号，括号里列出需要的参数，本例无参数。即使无参数，括号也不能省。 2．调用自定义过程：调用格式：格式 1：Call 过程名(参数列表)格式 2：过程名 参数列表对应上例的调用语句为：下载后可任意编辑Call Pline() 或者 Pline于是，有了这个自定义过程，在代码中凡是需要输出这行符号的地方，就可以简略地用一行语句来完成。可以理解，在程序中使用该过程的地方越多，采纳自定义的方式就越显示出其优越性。 3．带有参数的过程；这个过程的灵活性还不够，它只是能输出一行 60 个“*”符号。假如希望符号能够根据需要有不同的变化，比如有的地方输出的符号是等号“=”或者减号“-”等等，能够根据调用者的意愿来实现。这就需要有参数，这个参数决定了输出的符号。修改过程如下：Private Sub Pline1(ByVal Ch As String)Dim i As IntegerFor i = 1 To 60 Print Ch;Next iPrintEnd Sub现在这个过程的括号里，有了一个参数...