某些还是可以编的,只是效率肯定达不到。象join函数: 描述返回一个字符串,该字符串是通过连接某个数组中的多个子字符串而创建的。语法Join(list[, delimiter])Join函数语法有如下几部分:部分 描述 list 必需的。包含被连接子字符串的一维数组。 delimiter 可选的。在返回字符串中用于分隔子字符串的字符。如果忽略该项,则使用空格(" ")来分隔子字符串。如果delimiter是零长度字符串(""),则列表中的所有项目都连接在一起,中间没有分隔符。 Function JoinNew(a() As String, sTmp As String) As String Dim i As Integer, s As String s = a(0) For i = 1 To UBound(a) s = s & sTmp & a(i) Next JoinNew = s End Function汗……自定义函数怎么找不到忽略参数的选择……
找到了,Function JoinNew(a() As String, Optional sTmp As String) As String 正在找自定义函数中怎么知道可选参数是否已经传入?
嘿嘿,也找到了。学习了,哈哈 Function JoinNew(a() As String, Optional sTmp As String = " ") As String
描述返回一个字符串,该字符串是通过连接某个数组中的多个子字符串而创建的。语法Join(list[, delimiter])Join函数语法有如下几部分:部分 描述
list 必需的。包含被连接子字符串的一维数组。
delimiter 可选的。在返回字符串中用于分隔子字符串的字符。如果忽略该项,则使用空格(" ")来分隔子字符串。如果delimiter是零长度字符串(""),则列表中的所有项目都连接在一起,中间没有分隔符。
Function JoinNew(a() As String, sTmp As String) As String
Dim i As Integer, s As String
s = a(0)
For i = 1 To UBound(a)
s = s & sTmp & a(i)
Next
JoinNew = s
End Function汗……自定义函数怎么找不到忽略参数的选择……
正在找自定义函数中怎么知道可选参数是否已经传入?
Function JoinNew(a() As String, Optional sTmp As String = " ") As String