QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

查看: 1821|回复: 0
收起左侧

[分享] SetForegroundWindow

[复制链接]
发表于 2009-7-7 19:52:32 | 显示全部楼层 |阅读模式 来自: 中国河南鹤壁

马上注册,结识高手,享用更多资源,轻松玩转三维网社区。

您需要 登录 才可以下载或查看,没有帐号?注册

x
Get a handle to an application window.
+ }7 F, A! z, B/ @( X9 yDeclare Auto Function FindWindow Lib "USER32.DLL" ( _
0 U. t) e  V3 ~0 Z, E6 k" g0 r! CByVal lpClassName As String, _ ) f: C% o$ g$ L# b* K4 Y
ByVal lpWindowName As String) As IntPtr 0 U* _  g/ C  x

, X0 Q5 @) R$ O' m  w1 w' Activate an application window.
3 _$ I' n+ y2 _9 Y$ B. WDeclare Auto Function SetForegroundWindow Lib "USER32.DLL" _
8 y4 l5 C( G: K- a(ByVal hWnd As IntPtr) As Boolean . u5 |  F/ N3 _! [: X

/ F# X; C$ v8 d0 u* M$ ?6 y' Send a series of key presses to the Calculator application.
' K, O  h2 w0 |3 uPrivate Sub button1_Click(ByVal sender As Object, _ ) j/ B  Z& `5 d$ `2 \
ByVal e As EventArgs) Handles button1.Click 0 J) \$ }1 S% I5 Z3 W: o
% N, D7 }: ]+ c4 t6 Q9 Y
' Get a handle to the Calculator application. The window class ; U, }3 j3 I! F5 |
' and window name were obtained using the Spy++ tool.
$ P: F; q1 ^8 {- ?Dim calculatorHandle As IntPtr = FindWindow("SciCalc", "Calculator")
$ l8 z. H$ {0 t+ p) R
) n3 H1 |" P$ {0 I  a& v" w& t* Q( A' Verify that Calculator is a running process.
0 r# @# ~6 b" xIf calculatorHandle = IntPtr.Zero Then 6 d+ M7 I  D9 I& a
MsgBox("Calculator is not running.")
5 V. t5 `/ @/ s- P$ w/ N; R) G9 U. KReturn
/ Z  G; f3 u# HEnd If
4 ]) p( A8 }: [* _$ L- w' j

1 I' ~) f# `7 R5 e6 P1 c, U+ x- k* v[ 本帖最后由 zhaojianhong 于 2009-7-8 11:26 编辑 ]

评分

参与人数 1三维币 +10 收起 理由
hh749 + 10 好资料,感谢您对论坛的支持!

查看全部评分

发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则


Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

快速回复 返回顶部 返回列表