怎么限制他只在窗口标题为“cmdn”的窗体上运行呢?

喜洋洋和灰太狼 2009-10-30 04:16:01
Private Sub Timer1_Timer()
SendKeys "%{F4}" '10秒自动激活一次alt+f4
End Sub


'怎么限制他只在窗口标题为“cmdn”的窗体上运行呢?
'如果不限制的话 我运行别的程序是他也就胡来了
...全文
105 12 打赏 收藏 转发到动态 举报
写回复
用AI写文章
12 条回复
切换为时间正序
请发表友善的回复…
发表回复
  • 打赏
  • 举报
回复
谢谢 我先一个一个慢慢试 太菜了 得多百度几下了
贝隆 2009-10-30
  • 打赏
  • 举报
回复
使用SendMessage函数给指定的窗体发送该消息即可
mapeng345653927 2009-10-30
  • 打赏
  • 举报
回复
[Quote=引用 5 楼 king06 的回复:]
先用GetForegroundWindow取得当前活动窗口句柄,再用GetWindowText取标题,如果标题一致就执行
[/Quote]
ding
booksoon 2009-10-30
  • 打赏
  • 举报
回复
[Quote=引用 8 楼 chenjl1031 的回复:]
引用楼主 xlcike 的回复:
VB codePrivateSub Timer1_Timer()
SendKeys"%{F4}"'10秒自动激活一次alt+f4End Sub

'怎么限制他只在窗口标题为“cmdn”的窗体上运行呢?
'如果不限制的话 我运行别的程序是他也就胡来了


在回调中枚举捕获窗口标题为“cmdn”的窗体即可.
[/Quote]

UP~~~
东方之珠 2009-10-30
  • 打赏
  • 举报
回复
[Quote=引用楼主 xlcike 的回复:]
VB codePrivateSub Timer1_Timer()
SendKeys"%{F4}"'10秒自动激活一次alt+f4End Sub

'怎么限制他只在窗口标题为“cmdn”的窗体上运行呢?
'如果不限制的话 我运行别的程序是他也就胡来了
[/Quote]

在回调中枚举捕获窗口标题为“cmdn”的窗体即可.
舉杯邀明月 2009-10-30
  • 打赏
  • 举报
回复
[Quote=引用 5 楼 king06 的回复:]
先用GetForegroundWindow取得当前活动窗口句柄,再用GetWindowText取标题,如果标题一致就执行
[/Quote]
Ding.......
king06 2009-10-30
  • 打赏
  • 举报
回复
如果代码
Private Sub Timer1_Timer()
SendKeys "%{F4}" '10秒自动激活一次alt+f4
End Sub

是在MDI窗体里面的,那么直接
Private Sub Timer1_Timer()
If Form1 Is Me.ActiveForm Then'这里的form1换成你窗体的名称(不是标题)
SendKeys "%{F4}" '10秒自动激活一次alt+f4
endif
End Sub
king06 2009-10-30
  • 打赏
  • 举报
回复
先用GetForegroundWindow取得当前活动窗口句柄,再用GetWindowText取标题,如果标题一致就执行
getemail 2009-10-30
  • 打赏
  • 举报
回复
你首先需要用FindWindow找到cmdn窗体的句柄
然后用ActiveWindow使之激活
然后才可以
需要使用API
jhone99 2009-10-30
  • 打赏
  • 举报
回复
Private Sub Timer1_Timer()
form1.setfocus
SendKeys "%{F4}" '10秒自动激活一次alt+f4
End Sub
chenyanm 2009-10-30
  • 打赏
  • 举报
回复
不明白你的意思
getemail 2009-10-30
  • 打赏
  • 举报
回复
先顶