全是手机贴，还删回复，老是看这种手机帖子的标题不恶心吗？摄影吧的都来这里了，
---------我是尾巴会说话--------------------------
Dim i, n As Integer
For i = 1 To n
MsgBox(speak("楼主水笔", "楼上水笔", "全是水笔"))
Next
i += i
Public Function speak(ByRef a As String, ByRef b As String, ByRef c As String)
Return c
End Function
---------我是尾巴会说话--------------------------
Dim i, n As Integer
For i = 1 To n
MsgBox(speak("楼主水笔", "楼上水笔", "全是水笔"))
Next
i += i
Public Function speak(ByRef a As String, ByRef b As String, ByRef c As String)
Return c
End Function
