home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Programmer'…arterly (Limited Edition) / Visual_Basic_Programmers_Journal_VB-CD_Quarterly_Limited_Edition_1995.iso / code / ch18code / swap.bas < prev    next >
Encoding:
BASIC Source File  |  1994-10-12  |  146 b   |  10 lines

  1. Attribute VB_Name = "Module1"
  2. Option Explicit
  3.  
  4. Sub swap(arg1, arg2)
  5.     Dim temp
  6.     temp = arg1
  7.     arg1 = arg2
  8.     arg2 = temp
  9. End Sub
  10.