vb中关键字optional和ismissing函数的意义及用法

zhgc

Option用来说明参数是可选的，IsMissing判断该参数是否传递了。见下例：

1. Dim ReturnValue
   
2. ' 下列语句调用用户自定义函数。
   
3. ReturnValue = ReturnTwice()   ' 返回 Null。
   
4. ReturnValue = ReturnTwice(2)   ' 返回 4。
   
5. 
   
6. ' 函数过程定义。
   
7. Function ReturnTwice(Optional A)
   
8.    If IsMissing(A) Then
   
9.       ' 如果参数丢失，则返回 Null。
   
10.       ReturnTwice = Null
    
11.    Else
    
12.       ' 如果参数出现，则返回两倍的值。
    
13.       ReturnTwice = A * 2
    
14.    End If
    
15. End Funciton

复制代码