返回信息的参考参数VB.Net

Question

今晚的最后一个问题。我将如何去重写这段代码，以便不再通过返回值返回商，而是使用引用参数返回有关商的信息？

Function divideInputs(ByVal dividend As Integer, ByVal divisor As Integer) As Double 
    Dim quotient As Integer = 1 
quotient = dividend/divisor 
Return quotient 
End Function 

Answer 1

试试这个：

Sub divideInputs(ByVal dividend As Integer, ByVal divisor As Integer, ByRef quotient As Integer) 
    quotient = dividend/divisor 
End Sub 

然后调用逻辑，这样做：

Dim q As Integer 
divideInputs(6, 3, q)