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

7 lines
74 B
VB.net
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
sub swap( byref x, byref y )
dim temp
temp = x
x = y
y = temp
end sub