请先看一下代码，
Type SU
A As String
B As String
End Type

Function PicList(Index As Integer) As SU
Msgbox PicList(1).A
End Function

调用 PicList(1).A="你好"
这里说明了“你好”没被传入


再往下看
Function PicList(Index As Integer) As SU
PicList.A="你好"
End Function

调用 Msgbox PicList(1).A


以上两个测试说明了，值不能传入，但可以返回。有谁知道是怎么回事吗？要怎么才能传入值呢？



[ 本帖最后由 zhuiis 于 2011-11-4 20:02 编辑 ]