What Is In the MsgBox?
Private Sub Form_Click()
a = 2
b = 3
c = 4
Call DoIt(a, b)
MsgBox (a & " " & b & " " & c)
Call DoIt(c, a)
MsgBox (a & " " & b & " " & c)
Call DoIt(c, b)
MsgBox (a & " " & b & " " & c)
End Sub
Private Sub DoIt (g As Integer, f As Integer)
Dim t As Integer
t = f
f = g
g = t
End Sub
Next slide
Back to first slide
View graphic version