Swap
 
Exchanges the values of two variables

Syntax

Declare Sub Swap ( ByRef a As Any, ByRef b As Any )

Parameters

a
A variable to swap.
b
A variable to swap.

Description

Swaps the value of two variables.

Example

' using swap to order 2 numbers:
Dim a As Integer, b As Integer

Input "input a number: "; a
Input "input another number: "; b
If a > b Then Swap a, b
Print "the numbers, in ascending order are:"
Print a, b


Differences from QB

  • None

See also