如何在函数中传递数量不定的参数?

  • 来源: 互联网 作者: rocket   2008-03-18/09:29
  • 
    如果要传递不定个数的参数给过程,该过程应如下定义:
    
    Sub MySub( ParamArray P() ) '参数定义为一个数组
    
    以下的可能的调用:
    
    MySub "ABC" 
    MySub 1, 3, 9, 988, 776, 234 
    MySub 123, "abc", Date() 
    
    可用以下的方法来读每个参数:
    
    For i = 0 To UBound(P) 
      ' P(i) 为第 i 个参数
    Next
     
    

    评论 {{userinfo.comments}}

    {{money}}

    {{question.question}}

    A {{question.A}}
    B {{question.B}}
    C {{question.C}}
    D {{question.D}}
    提交

    驱动号 更多