安徽彩票大奖 欧洲百万乐透大奖 七星彩17049规律大奖 双色球中大奖领奖过程 3d近期中大奖故事 广州番禺中福彩大奖的 鸡男注定会中大奖 2016江苏彩民中大奖 趣彩网大奖网黑平台 大乐透4.97亿大奖 霍邱一彩民6元中双色球547万大奖 双色球黑龙江中大奖图 体育彩票中大奖名单 什么样的人能中大奖 彩票大奖作假

vba通过findwindow获取窗口句柄后并判断是否为活动窗口

2017-09-17 08:00:00
zstmtony
原创
2220

vba通过findwindow获取窗口句柄后并判断是否为活动窗口


'定义Findwindow windows API 函数
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long  '定义GetForegroundWindows API 获取最前面窗体 Private Declare Function GetForegroundWindow Lib "user32" () As Long
 '可以通过查看前景窗口是否为指定窗口判断
 hwd1 = FindWindow("#32770", "QQ用户登录")
  
   '获得指定窗口句柄 hwd2 = GetForegroundWindow

'获?#20204;?#26223;窗口句柄 If hwd1 = hwd2 Then MsgBox "指定窗口为活动状态!"
'判断是否相同
分享
? 1999-2019 Office交流网?? 中山市天鸣科技发展有限公司 粤ICP备10043721号-5 SQL查询:18
内存占用:7.75MB
PHP 执行时间:0.17
双色球大奖2000年
安徽彩票大奖 欧洲百万乐透大奖 七星彩17049规律大奖 双色球中大奖领奖过程 3d近期中大奖故事 广州番禺中福彩大奖的 鸡男注定会中大奖 2016江苏彩民中大奖 趣彩网大奖网黑平台 大乐透4.97亿大奖 霍邱一彩民6元中双色球547万大奖 双色球黑龙江中大奖图 体育彩票中大奖名单 什么样的人能中大奖 彩票大奖作假