在 Function 过程中如何定义可省略的参数？

比如说我定义一个   Function（a   as   string   ,b   as   integer）   过程  
  我调用是可以使用个参数，也可以省略掉第二个参数？  
  问题点数：50、回复次数：7Top

1 楼spring_y（蹭分也要蹭到一颗星）回复于 2002-06-11 10:30:22 得分 5

optional   不行吗Top

2 楼luckysusan（海闊天空）回复于 2002-06-11 10:38:15 得分 20

Optional   参数可以带缺省值，可以是除   Variant   之外的任何类型。  
   
  '如果函数的参数定义如下：  
  Function   MyFunc(MyStr   As   String,   Optional   MyArg1   As     Integer   =   5,   Optional   MyArg2   =   "Dolly")    
  Dim   RetVal  
  '则可用如下代码调用该函数：  
  RetVal   =   MyFunc("Hello",   2,   "World")       '提供了所有   3   个参数。  
  RetVal   =   MyFunc("Test",   ,   5)       '省略了参数   2。  
  '参数   1   和参数   3   使用了命名的参数。  
  RetVal   =   MyFunc(MyStr:="Hello   ",   MyArg1:=7)  
   
  Top

3 楼ganzhiruogy（方竹）回复于 2002-06-11 10:39:51 得分 5

Optional   LParm   As   VariantTop

4 楼lincanwen（密码错误）回复于 2002-06-11 10:44:17 得分 5

Public   Function   test(Optional   a   as   string   ,Optional   b   as   integer)  
        MsgBox   "sdfsdf",   vbOKOnly,   "sdfsd"  
  End   FunctionTop

5 楼daviddivad（你真行，居然比我还快！ Scorpio）回复于 2002-06-11 10:51:19 得分 5

Optional   之后所有的参数都必须是可选的。  
  在过程中可用IsMissing来检测参数是否没有传进来，这时可用默认值。Top

6 楼fengerly（小精灵）回复于 2002-06-11 11:10:05 得分 5

function   myFunction（a   as   string   ,Optional   b   as   integer）Top

7 楼tj_aj（）回复于 2002-06-11 11:27:39 得分 5

关键字：optional  
  vb还可以在传递任意多个参数呢！Top

相关问题

• 参数
• myarg
• myfunc
• retval
• 过程
• 可用
• optional
• b as integer
• a as string
• function

• 帖主：zhongminsheng
• spring_y
• luckysusan
• ganzhiruogy
• lincanwen
• daviddivad
• fengerly
• tj_aj

• Visual Basic类图书
• Visual Basic类源码下载