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.cls < prev    next >
Encoding:
Text File  |  1994-10-12  |  225 b   |  13 lines
  1. Version 1.0 Class
  2. Attribute VB_Name = "Class1"
  3. Attribute VB_Creatable = True
  4. Attribute VB_Exposed = False
  5. Option Explicit
  6.  
  7. Sub swap(arg1, arg2)
  8.     Dim temp
  9.     temp = arg1
  10.     arg1 = arg2
  11.     arg2 = temp
  12. End Sub
  13.