vba之函数返回值(可多个返回值).docVIP

VBA#160; 之函数返回值 (可多个返回值 ) vba 之函数返回值 1.Function define_yy(ByVal names As String, ByValworkbooks As String) As String Dim str_return As String 返回值 Dim i, t As Integer ........ ........ ........ ........ ........ define_yy = str_return End Function 对于函数返回值的要点已经用粗体表示出来了 .调用此函数 的格式为 : call modle_connection.define_yy() ( 这个是不需要返回值的调 用方法 ) bb=modle_connection.define_yy(a,b) ( 这是需要返回值的方 ) :modle_connection 为程序块名 2.返回值为多个值 ,可以采用返回数组的类型 Function return_data(ByVal strSEL As String, ByRef x As Integer) AsString() 需要有括号 ,代表数组 Dim cn As New ADODB.Connection Dim rs As New ADODB.Recordset Dim bb(1000, 2