vb中fuction能有二個回傳值嗎？

Question

vb中fuction能有二個回傳值嗎？
如果可以語法怎麼寫？用一個簡單例子寫出來可以嗎？謝謝您！

你的意思是會有Test (傳值)及M(傳址)二個回傳值嗎？

是不是可以寫成這樣(省略Optional) ByRef M As Integer

Answer 1

'可利用傳址的方式傳回另一個值
Private Sub Command1_Click()
Dim A As Integer, B As Integer, C As Integer
A = 8: B = 5
Print A; "/"; B; "="; Test(8, 5, C); "餘"; C
End Sub

Function Test(ByVal N1 As Integer, N2 As Integer, Optional ByRef M As Integer) As Integer
M = N1 Mod N2
Test = N1 \ N2
End Function

2006-01-30 00:05:43 補充：
應該是說有Test傳回結果及改變M值(傳址)VB自訂函數或副程式預設都是傳址(ByRef),故Optional ByRef M As Integer其中ByRef可省略.其實函數要傳回兩種以上回傳值還有很多種方式,如傳回陣列值也是不錯的方法....XD

2006-02-02 01:52:12 補充：
如果省略Optional 表示M值一定要輸入,若要如此可連ByRef都省掉.