How is it work?

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Hi,
I am working on VB project. I am new to VB. Could any one tells me what do
the following codes do?
Specially, what does GetPrivateProfileString do?

Private Declare Function GetPrivateProfileString _
Lib "kernel32" Alias "GetPrivateProfileStringA" _
(ByVal lpSectionName As String, _
ByVal lpKeyName As Any, _
ByVal lpDefault As String, _
ByVal lpReturnedString As String, _
ByVal nSize As Long, _
ByVal lpFileName As String) As Long

Dim success As Long
Dim nSize As Long
Dim ret As String
ret = Space$(2048)
nSize = Len(ret)
success = GetPrivateProfileString(lpSectionName, lpKeyName, _
defaultValue, ret, nSize, inifile)

I have no idea what is going on here. What will be success value?
 
Hi,
I am working on VB project. I am new to VB. Could any one tells me what do
the following codes do?
Specially, what does GetPrivateProfileString do?

Private Declare Function GetPrivateProfileString _
Lib "kernel32" Alias "GetPrivateProfileStringA" _
(ByVal lpSectionName As String, _
ByVal lpKeyName As Any, _
ByVal lpDefault As String, _
ByVal lpReturnedString As String, _
ByVal nSize As Long, _
ByVal lpFileName As String) As Long

Dim success As Long
Dim nSize As Long
Dim ret As String
ret = Space$(2048)
nSize = Len(ret)
success = GetPrivateProfileString(lpSectionName, lpKeyName, _
defaultValue, ret, nSize, inifile)

I have no idea what is going on here. What will be success value?
Click to expand...

Looks to me that you are working in a VB6 project in which case you might want to ask in
a VB6 group:

microsoft.public.vb.general.discussion

Gene
 
Siva said:
I am working on VB project. I am new to VB. Could any one tells me what do
the following codes do?
Specially, what does GetPrivateProfileString do?

Private Declare Function GetPrivateProfileString _
Lib "kernel32" Alias "GetPrivateProfileStringA" _
(ByVal lpSectionName As String, _
ByVal lpKeyName As Any, _
ByVal lpDefault As String, _
ByVal lpReturnedString As String, _
ByVal nSize As Long, _
ByVal lpFileName As String) As Long
Click to expand...

This is VB6 code. You may want to check out the sample at
<URL:http://mentalis.org/soft/class.qpx?id=6>.
 
Hi

A Quick search in Google will tell you all you need to know about what
the function is for.
 
Siva said:
Hi,
I am working on VB project. I am new to VB. Could any one tells me what do
the following codes do?
Specially, what does GetPrivateProfileString do?

Private Declare Function GetPrivateProfileString _
Lib "kernel32" Alias "GetPrivateProfileStringA" _
(ByVal lpSectionName As String, _
ByVal lpKeyName As Any, _
ByVal lpDefault As String, _
ByVal lpReturnedString As String, _
ByVal nSize As Long, _
ByVal lpFileName As String) As Long

Dim success As Long
Dim nSize As Long
Dim ret As String
ret = Space$(2048)
nSize = Len(ret)
success = GetPrivateProfileString(lpSectionName, lpKeyName, _
defaultValue, ret, nSize, inifile)

I have no idea what is going on here. What will be success value?
Click to expand...

This will read a line from an .ini file.
 
Back
Top