RosettaCodeData/Task/Generic-swap/VBScript/generic-swap-1.vbs

7 lines
74 B
Text
Raw Permalink Normal View History

2026-04-30 12:34:36 -04:00
sub swap( byref x, byref y )
dim temp
temp = x
x = y
y = temp
end sub