' vbs变量的作用域和生命周期

'  作用域

'1、vbs的变量有三种作用域： 脚本级作用域、过程级作用域、类级作用域

'2、vbs变量的作用域与三个关键字有关： Dim、Private、Public

'3、一般Private、Public用在类中， dim用在脚本级和过程级中

'4、关于Private和Public在后面类中进行描述

Option Explicit 

'定义脚本级变量

'脚本级变量在整个脚本都可用

Dim strUserName

strUserName = "volcanol"

'调用方法访问脚本级变量，

DisplayGlobalVarible

DisplayUserName

Sub DisplayUserName()

    '定义过程级变量，且这个变量与外面的变量同名，

    '因此这个变量就将

    Dim strUserName

    strUserName = InputBox("输入名字")

    MsgBox strUserName

End Sub

Sub DisplayGlobalVarible()

    '访问全局变量

    MsgBox strUserName

End Sub

'变量的生命周期

'1、脚本级的变量的生命周期是脚本运行的整个期间

'2、过程或者函数级变量的生命周期是函数、过程调用的整个期间

'3、类级的变量生命周期是类的对象存续的期间

'具体这个就不说了， 慢慢体会吧

'函数、过程调用的传值byval和传址byref

'

'1、byval 就和C语言中的普通参数一样，对原参数不会进行修改

'2、byref 就和C语言中的指针参数一样，可以对原参数进行修改，

'   当然，如果byref不进行赋值操作的话，也不会进行修改

Dim lngByVal

Dim lngByRef

lngByVal =

lngByRef = 

'调用传值参数，不改变原来的参数

subByVal lngByVal

'调用传址参数，改变原来的值

subByref lngByRef

MsgBox lngByVal & vbNewLine & lngByRef

'说明一点， 对于传址调用的检查不能保证100%的有效果

'这里，按照正常用法，应该传递变量

subByRef 

'传值参数

Sub subByVal(byval lngPar)

    lngpar = lngpar +

End Sub

'传址参数

Sub subByRef(byref lngPar)

    lngpar = lngpar +

End Sub