摘要:
方法1 ——借助Class' 定义一个有多个变量成员的类Class MultiValue Dim a, b, cEnd ClassFunction ClassMulti(param1, param2, param3) Dim oClass ' 实例化类 Set oClass = New MultiValue oClass.a = param1 oClass.b = param2 oClass.c = param3 ' 指定函数返回为oClass对象 Set ClassMulti = oClassEnd FunctionDim oClassSet oClass = Cla 阅读全文
posted @ 2013-07-16 11:18
芯树
阅读(2083)
评论(0)
推荐(0)

浙公网安备 33010602011771号