Excel VBA高效办公应用-第二章-Excel VBA编辑基础-Part1(VBA关键字)

VBA常用关键字有：

And

Arrary

As

Binary

Boolean

Byref

Byval

Case

Currency

Date

Dim

Do

Double

Else

Empty

End

Error

Exit

False

For

Friend

Get

Imp

Input

Integer

Is

Len

Let

Lock

Long

Loop

Me

Mid

Mod

New

Next

Nothing

Null

Object

On

Open

Option

Optional

Or

ParamArray

Print

Private

Property

Public

Result

Resume

Run

Seek

Select

Selection

Set

Static

Step

String

Sub

Then

Time

To

True

Type

Until

Variant

With

WithEvents

Xor

有没有人认识以上所有关键字的？请受我一拜。

反正我又好几个不懂的，特此学习一番：

1. Byval和Byref的区别（引用内容：http://club.excelhome.net/thread-735621-1-1.html）

可以很简明的描述这两者的区别的：

Function TestA(ByVal intI As Integer)

 intI = intI + 10

 TestA = intI

End Function

Function TestB(ByRef intI As Integer)

 intI = intI + 10

 TestB = intI

End Function

Sub ByrefCompareToByvals()

 Dim intA As Integer

 Dim intB As Integer

 

 intA = 10

 intB = 10

 

 Debug.Print "1--ByVal "

 Debug.Print "运算前：" & intA

 Debug.Print "运算结果：" & TestA(intA)

 Debug.Print "参与运算后：" & intA

 

 

 Debug.Print "1--ByRef "

 Debug.Print "运算前：" & intB

 Debug.Print "运算结果：" & TestB(intB)

 Debug.Print "参与运算后：" & intB

 

End Sub

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
'1--ByVal

'运算前：10

'运算结果：20

'参与运算后：10

'

'1--ByRef

'运算前：10

'运算结果：20

'参与运算后： 20
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
从例子上就看出来了：

ByVal   传送参数内存的一个拷贝给被调用者。源数据不会被修改

ByRef   传送参数内存的实际地址给被调用者。源数据可能被修改

2. Friend关键字 （引用自：http://www.excelba.com/Art/Html/159.html）

虽然在VBA中几乎没有什么用，但如果有一天你要制作ActiveX部件，可能会用到它。之所以要有Friend关键字，是因为类的私有部分在类模块外是不可见的，但有时却需要从外面访问这些私有部分，这时，可以使用Friend关键字使属性和方法成为“友元成员”。友元成员在本工程中相当于Public，但在工程外，它仍是Private 。

还有几个，有点累了，留到以后再学习。