VB 最小化后，模拟键盘向下键↓而不失去窗体焦点

Question

要求:最小化后也能正常  窗体画一个command1 跟一个 时间控件。 当5秒后自动按command1（command1对应的是键盘↓向下键）~~~~~~~~~下面的代码打开窗体时可以 最小化窗体后就失去了焦点 向下键不是在最小化的窗体中运行了，而是根据鼠标的位置在运行  
 Private Sub Command1_Click()
  Timer1.Interval = 1000
  Timer1.Enabled = True
  End Sub  Private Sub Timer1_Timer()
  Timer1.Enabled = False
  SendKeys ("{DOWN}") '对应的是键盘↓向下键
  End Sub求高人给点代码

Answer 1

 Private Sub Command1_Click()
  Timer1.Interval = 1000
  Timer1.Enabled = True
  End Sub  Private Sub Timer1_Timer()
  Timer1.Enabled = False
  'SendKeys ("{DOWN}") '对应的是键盘↓向下键
  Call Command1_Click()
  End Sub

Answer 2

论坛签名======================================================================xinjianaaaaa:你好!
截至 2011-05-20 20:55:41 前:
你已发帖 5 个, 未结贴 5 个;
结贴率为： 0.00%

当您的问题得到解答后请及时结贴.
http://topic.csdn.net/u/20090501/15/7548d251-aec2-4975-a9bf-ca09a5551ba5.html
http://topic.csdn.net/u/20100428/09/BC9E0908-F250-42A6-8765-B50A82FE186A.html
http://topic.csdn.net/u/20100626/09/f35a4763-4b59-49c3-8061-d48fdbc29561.html如何给分和结贴？
http://community.csdn.net/Help/HelpCenter.htm#结帖如何给自己的回帖中也加上签名？
http://blog.csdn.net/q107770540/archive/2011/03/15/6250007.aspx