home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / theloa1a / bas_load.bas next >
Encoding:
BASIC Source File  |  1999-10-11  |  568 b   |  18 lines

  1. Attribute VB_Name = "basFunctions"
  2. Public Declare Function GetPrivateProfileString Lib _
  3. "kernel32" Alias "GetPrivateProfileStringA" _
  4. (ByVal lpApplicationName As String, ByVal lpKeyName _
  5. As Any, ByVal lpDefault As String, ByVal _
  6. lpReturnedString As String, ByVal nSize As Long, _
  7. ByVal lpFileName As String) As Long
  8.  
  9.  
  10. Public Declare Function WritePrivateProfileString Lib _
  11. "kernel32" Alias "WritePrivateProfileStringA" _
  12. (ByVal lpApplicationName As String, _
  13. ByVal lpKeyName As Any, ByVal lpString As Any, _
  14. ByVal lpFileName As String) As Long
  15.  
  16.  
  17.  
  18.