RosettaCodeData/Task/Generic-swap/VBScript/generic-swap-1.vb
2023-07-01 13:44:08 -04:00

6 lines
74 B
VB.net

sub swap( byref x, byref y )
dim temp
temp = x
x = y
y = temp
end sub