Extracting a int32 from a string (VB6)

[Sammy]

Subject line says it all really.
I have a 4 character long string, that contains a 32bit integer. Problem is
i have no idea how i go about extracting it.

Any help will be appreciated.

[J French]

On Fri, 14 Nov 2003 12:39:07 -0000, "Sammy" <[e-mail]> wrote:

Subject line says it all really.
I have a 4 character long string, that contains a 32bit integer. Problem is
i have no idea how i go about extracting it.

Any help will be appreciated.

It may be 4 characters long, but due to the perversity of MS, it is 8
bytes
Private Declare Sub MoveString _
Lib "kernel32" _
Alias "RtlMoveMemory" _
(Dest As Any, _
ByVal Source As String, _
ByVal Bytes As Long)
Public Function CVL(S$) As Long
If Len(S$) < 4 Then
MsgBox "CVL Error - String too Short"
Exit Function
End If
Call MoveString(CVL, S$, 4)
End Function

[Sammy]

Perfect, thanks very much for the help.

Sammy.

"J French" <er*****@nowhere.com> wrote in message
news:3f****************@news.btclick.com...

On Fri, 14 Nov 2003 12:39:07 -0000, "Sammy" <[e-mail]> wrote:

Subject line says it all really.
I have a 4 character long string, that contains a 32bit integer. Problem isi have no idea how i go about extracting it.

Any help will be appreciated.

It may be 4 characters long, but due to the perversity of MS, it is 8
bytes
Private Declare Sub MoveString _
Lib "kernel32" _
Alias "RtlMoveMemory" _
(Dest As Any, _
ByVal Source As String, _
ByVal Bytes As Long)
Public Function CVL(S$) As Long
If Len(S$) < 4 Then
MsgBox "CVL Error - String too Short"
Exit Function
End If
Call MoveString(CVL, S$, 4)
End Function