Visual Basic Quiz?

Question

This is Visual Basic 6.0. (No cheating now)
Can anyone tell me the results that will be displayed in the Immediate window when the procedure Test is called?

Public Sub Test()
Dim sTemp As String
Dim bRetVal As Boolean



sTemp = "Original"
TestFunction (sTemp)
Debug.Print "Result 1 = " & sTemp

sTemp = "Original"
bRetVal = TestFunction(sTemp)
Debug.Print "Result 2 = " & sTemp

sTemp = "Original"
bRetVal = TestFunction((sTemp))
Debug.Print "Result 3 = " & sTemp

End Sub


Private Function TestFunction(sTest As String) As Boolean
sTest = "Changed"

TestFunction = True 'Set a return value
End Function

I know the answer. It's just a quiz for anyone who might find it fun.

Answer 1

VB6 passes everything by reference by default.

So:
Result 1 = Changed
Result 2 = Changed
Result 3 = Changed


It would have been a better quiz if you didn't use the same variable name in the function, as you'd see the variable in the calling function get overwritten with each call to TestFunction.

Answer 2

Result 1 = Original
Result 2 = True
Result 3 = Original

Answer 3

wtf u just want us to do it for u lol