在 CE 表单（Windows Form）中启动应用程序/游戏

我按照教程做了一个小的 VB Net 项目，将窗口应用程序打开到窗体边界内。我已经将控制窗口应用程序的功能转换为 Cheat Engine Lua 语法：

f = createForm()
f.setSize(640,500)
f.Caption = '测试在边界内启动应用程序'

b = createButton(f)
b.setPosition(570,460)
b.setSize(60,30)
b.Caption = '启动'

function SetParent(hWndChild, hWndNewParent)
  executeCodeLocalEx('SetParent', hWndChild, hWndNewParent)
end

function SetWindowPos(hwnd, hWndInsertAfter, x, y, cx, cy, wFlags)
  executeCodeLocalEx('SetWindowPos', hwnd, hWndInsertAfter, x, y, cx, cy, wFlags)
end

function MoveWindow(hwnd, x, y, cx, cy, repaint)
  local rp
  if repaint then
    rp=1
  else
    rp=0
  end
  executeCodeLocalEx('MoveWindow', hwnd, x, y, cx, cy, rp)
end

function launch()
 local ps1 = os.execute'calculator.exe'
 sleep(1000)
 --- appWin1 = ps1.MainWindowHandle   --- how this?
 local appWin1 = findWindow(nil,'计算器')
 SetParent(appWin1,f)
 MoveWindow(appWin1, 0,0, f.Width/2, f.Height/2,true)
end

b.OnClick = launch

但是上面的代码无法工作。VB Net 中的代码如下：

NeedtoCELua = [[ Private Sub button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles button1.Click
            Try
                Dim ps1 As New ProcessStartInfo("notepad.exe")
                ps1.WindowStyle = ProcessWindowStyle.Minimized
                Dim p1 As Process = Process.Start(ps1)
                Thread.Sleep(1000) ' 允许进程打开它的窗口
                appWin1 = p1.MainWindowHandle
                ' 将它放到这个窗体中
                SetParent(appWin1, Me.Handle)
                ' 移动窗口以将其叠加在此窗口上
                MoveWindow(appWin1, 0, 0, Me.Width \ 2, Me.Height, True)

Private Sub Form8_Resize(ByVal sender As Object, ByVal e As EventArgs)
            If Me.appWin1 <> IntPtr.Zero Then
                MoveWindow(appWin1, 0, 0, Me.Width \ 2, Me.Height, True)
            End If

            If Me.appWin2 <> IntPtr.Zero Then
                MoveWindow(appWin2, Me.Width \ 2, 0, Me.Width, Me.Height, True)
            End If
            'base.OnResize(e);
        End Sub
]]

如何编写一个适当的函数在 CE Lua 中参考上面所示的 VB Net 函数来点击按钮并使其工作？