สอบถามการเขียนให้คำสั่งทำงานซ้ำๆ หน่อยนะครับ แบบว่าพอกดมันก็จะทำงานวนเรื่อยๆ จนกว่าจะครบตามที่เราตั้งไว้น่ะ

Dim h As String
            Dim G As String
            On Error Resume Next
        For Hack = 49 To 63 Step 2
            G = Hex(Hack)
            h = "&H" & G
            WritePointerByte("Game", &Hxxxcccc, Hack, &H2ACA0)
            WritePointerByte("Game", &Hxxxxccc, 1, &H2AC8C)
WritePointerInteger("Game", &Hxxxxxx, 702001017, &H2AC88)
        Next

If Checkbox1.checked = True Then
Hack.start()
Else
Hack.stop()

End If