急VB.NET多线程卡的有关问题

急急急~VB.NET多线程卡的问题
我要做的是一个游戏挂机的程序，
每次单击按钮，就开启两个对应的线程
这样是可以运行的。但是游戏会卡的要死。CPU老高。有没有方法解决？

VB.NET code

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click                   hwnd = window.getMouseOverWindow'获取窗口句柄                    Dim autoFb As New AutoFuBen'创建控制游戏的类的示例                    autoFb.gHwnd = hwnd                    autoFb.isKillOne = cboKillOne.Checked'变量赋值                    '启动线程（每个游戏要开启两个线程）                    Dim thread2 As New Threading.Thread(AddressOf autoFb.beginGame)                    thread2.start()                    Dim thread3 As New Threading.Thread(AddressOf autoFb.yanzheng)                    thread3.start()End Sub