Browse DevX
Sign up for e-mail newsletters from DevX

Tip of the Day
Language: VB4/32,VB5,VB6
Expertise: Intermediate
Jun 17, 2000



Building the Right Environment to Support AI, Machine Learning and Deep Learning

PokeB, PokeI, PokeL - Write a byte, integer or long value into memory

Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (dest As _
    Any, source As Any, ByVal bytes As Long)

' write a byte into memory

Sub PokeB(ByVal address As Long, ByVal value As Byte)
    CopyMemory ByVal address, value, 1
End Sub

' write an integer into memory

Sub PokeI(ByVal address As Long, ByVal value As Integer)
    CopyMemory ByVal address, value, 2
End Sub

' write a Long value into memory

Sub PokeL(ByVal address As Long, ByVal value As Long)
    CopyMemory ByVal address, value, 4
End Sub

Francesco Balena
Comment and Contribute






(Maximum characters: 1200). You have 1200 characters left.



Thanks for your registration, follow us on our social networks to keep up-to-date