高手请进-》VB 怎么实现内存查找？？？？？？？

Question

Private Sub Command1_Click()
    Dim a As Single
    a = VarPtr(Text1.Text)
    Debug.Print a
    
End Sub

Answer 1

Ranma_True(乱马1/2(真)) 你好，我用你的方法，要把那地址替换，可以不行啊。(取得进程标识符，打开进程，这些省略...........................)WriteProcessMemory pHandle,a,"Hello",5,0& '这样不行啊b=("&H" & hex(a))WriteProcessMemory pHandle,b,"Hello",5,0& '这样也不行啊

Answer 2

唉，好不容易才登录进来。
Option ExplicitPrivate Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
Private Sub Command1_Click()
    Dim a As String
    Dim b As String
    a = Text1.Text
    b = "321"
    Call CopyMemory(ByVal a, ByVal b, 4)
    Text1.Text = a
End SubPrivate Sub Form_Load()
    Text1.Text = "123"
End Sub