7,763
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
huhaha7171 2002-06-27
- 打赏
- 举报
对于WIN2K系统里自带的如"系统特性""设备管理器"等等,他们是窗口吗?怎样得到他们的句柄?
softrain 2002-06-27
- 打赏
- 举报
你看窗体的标题了，你打开看看就知道了，注意有时标题后边会有空格，而你看不出来。
huhaha7171 2002-06-26
- 打赏
- 举报
请问:这样行吗?"设备管理器"能作为参数吗?
Dim hw&, cnt&
hw& = FindWindow("设备管理器", vbNullString)
cnt = SetFocusAPI(hw&)
Dim hw&, cnt&
hw& = FindWindow("设备管理器", vbNullString)
cnt = SetFocusAPI(hw&)
softrain 2002-06-26
- 打赏
- 举报
98是同步，而2000是异步的。
你需要在2后面用一个循环，等到设备管理器出现时再跳出循环。并且还有转移焦点。
找设备管理器需要用findwindow函数，转移焦点需要setfocusapi函数。
你需要在2后面用一个循环，等到设备管理器出现时再跳出循环。并且还有转移焦点。
找设备管理器需要用findwindow函数，转移焦点需要setfocusapi函数。
huhaha7171 2002-06-26
- 打赏
- 举报
各位老大,是这样的:
1:Shell "c:\winnt\system32\control.exe SYSDM.cpl,,2", vbNormalFocus
2:SendKeys "%(D)"
3:SendKeys "{TAB}"
4:SendKeys "{DOWN 10}"
程序执行到2:后有一个"设备管理器"的窗口,
想在"设备管理器"上执行3,4的操作.
奇怪#:可是,好像(2)执行后的"设备管理器"还没出现,(3)就在(1)调出的窗口里执行了.
奇怪##:在win98下没问题(好像是按语句的顺序执行),可在在win2k下好像士兵行了
请求大哥帮忙!!!!!!!
1:Shell "c:\winnt\system32\control.exe SYSDM.cpl,,2", vbNormalFocus
2:SendKeys "%(D)"
3:SendKeys "{TAB}"
4:SendKeys "{DOWN 10}"
程序执行到2:后有一个"设备管理器"的窗口,
想在"设备管理器"上执行3,4的操作.
奇怪#:可是,好像(2)执行后的"设备管理器"还没出现,(3)就在(1)调出的窗口里执行了.
奇怪##:在win98下没问题(好像是按语句的顺序执行),可在在win2k下好像士兵行了
请求大哥帮忙!!!!!!!
qbilbo 2002-06-26
- 打赏
- 举报
用API Sleep
能说一下为什么要这样吗？说不定有更好的解决方法。
能说一下为什么要这样吗？说不定有更好的解决方法。
绿洲 2002-06-26
- 打赏
- 举报
现在的多进程操作系统中，基本上没有办法精确控制语句的执行情况，进程的运行速度以及进程间的相对速度.
spring_y 2002-06-26
- 打赏
- 举报
sleep
softrain 2002-06-26
- 打赏
- 举报
Private Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)
for i=1 to 10
sleep 1000
debug.pring i
i=i+1
next
for i=1 to 10
sleep 1000
debug.pring i
i=i+1
next
