用VB写自动喊话 自动找焦点 自动输入

				这里我们用VB写一个可以在游戏里自动喊话的外挂 
				这里用到4个控件
				text1 这里用来存放你要自动喊话的内容
				command1 用来执行命令 开始喊话
				timer1 这个是计时器
				用来控制隔多长时间喊话一次
				command2 用来停止吧
				
				
				现在开始写代码
				
				Timer1.Interval = 1000 是设置自动喊话的间隔是1秒
				Timer1.Enabled = flase 这个是让计时器在窗替加载的时候不运行
				
				
				SendKeys Text1.Text
				SendKeys "{enter}"
				这两句是让程序发送text1.text里的内容
				然后按下enter键
				运行 我们看下效果
				看到了
				我们设置的timer1.intrval=1000
				这里就是每1秒种出来一句话
				
				
				OK了
				当程序获得焦点  的时候就起效果了
				我们放到游戏里测试下
				
				不好意思刚才断开了
				现在我们继续来测试在游戏里的使用效果
				
				呵呵
				成功
				只是有的游戏里设置了喊话间隔时间 
				我们可以修改下时间 
				也可以增加自动喊话的内容
				呵呵 教程结束
				
				
							                     lxdwwei 
				 					lxdwwei@126.com
										2007.9.9