home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / VISUAL_B / CODIGO_1 / BITS_DLL / DLLTEST.BAS < prev    next >
Encoding:
BASIC Source File  |  1992-04-14  |  977 b   |  13 lines
  1. Declare Function GetProfileString Lib "Kernel" (ByVal Sname$, ByVal Kname$, ByVal Def$, ByVal Ret$, ByVal Size%) As Integer
  2.  
  3. Declare Function bitAnd Lib "d:\vb\workshop\bits.dll" (ByVal v1 As Integer, ByVal v2 As Integer) As Integer
  4. Declare Function bitOr Lib "d:\vb\workshop\bits.dll" (ByVal v1 As Integer, ByVal v2 As Integer) As Integer
  5. Declare Function bitXOr Lib "d:\vb\workshop\bits.dll" (ByVal v1 As Integer, ByVal v2 As Integer) As Integer
  6. Declare Function bitShiftLeft Lib "d:\vb\workshop\bits.dll" (ByVal v1 As Integer, ByVal v2 As Integer) As Integer
  7. Declare Function bitShiftRight Lib "d:\vb\workshop\bits.dll" (ByVal v1 As Integer, ByVal v2 As Integer) As Integer
  8.  
  9. Declare Function byteHigh Lib "d:\vb\workshop\bits.dll" (ByVal v1 As Integer) As Integer
  10. Declare Function byteLow Lib "d:\vb\workshop\bits.dll" (ByVal v1 As Integer) As Integer
  11. Declare Function bitPack Lib "d:\vb\workshop\bits.dll" (ByVal v1 As Integer, ByVal v2 As Integer) As Integer
  12.  
  13.