VB,如何调用某个已经打开的程序窗口？
可以使用vb里面的AppActivate 语句来激活某个已经打开的程序窗口,语句如下:
AppActivate title[, wait]
参数
title
必需的。字符串表达式，所要激活的应用程序窗口的标题。可以使用 Shell 函数返回的任务识别码来替换 title，以激活应用程序。
wait
可选的。Boolean
值，说明在激活另一个应用程序之前调用的应用程序是否有焦点。如果为
False（缺省），那么，即使调用的应用程序没有焦点，也直接激活指定的应用程序。如果为
True，则调用的应用程序会等到有焦点后，才激活指定的应用程序。
说明
AppActivate
语句将焦点移动到命名的应用程序或窗口，但并不影响焦点是否最大化或最小化。当用户采取行动改变焦点或将窗口关闭时，就会将焦点从活动的应用程序窗口移动出去。可用 Shell 函数启动一个应用程序并设置窗口样式。
在决定激活哪个应用程序时，请将 title
与每一个运行中的应用程序的标题字符串进行比较。如果没有完全匹配，就激活任何这样的应用程序，其标题字符串以 title 开头。如果以 title 命名的应用程序有很多实例，则激活任何一个实例。
激活窗口以后还可以执行SendKeys 语句,语法如下:
SendKeys string[, wait]
参数：
string
必需的。字符串表达式，指定要发送的按键消息。
Wait
可选的。指定等待方式的 BooleandefBooleanDataType@veendf98.chm 值。如果为
False（缺省值），则控件在按键发送出去之后立刻返回到过程。如果为
True，则按键消息必须在控件返回到过程之前加以处理。
说明
每个按键由一个或多个字符表示。为了指定单一键盘字符，必须按字符本身的键。例如，为了表示字母 A，可以用 "A" 作为 string。为了表示多个字符，就必须在字符后面直接加上另一个字符。例如，要表示 A、B 及
C，可用 "ABC" 作为 string。
对 SendKeys 来说，加号 (+)、插入符 (^)、百分比符号
(%)、上划线 (~) 及圆括号 ( ) 都具有特殊意义。为了指定上述任何一个字符，要将它放在大括号 ({})
当中。例如，要指定正号，可用 {+} 表示。方括号 ([ ]) 对 SendKeys
来说并不具有特殊意义，但必须将它们放在大括号中。在其它应用程序中，方括号有特殊意义，在出现动态数据交换 (DDE) 的时候，它可能具有重要意义。为了指定大括号字符，请使用
{{} 及 {}}。
为了在按下按键时指定那些不显示的字符，例如 ENTER 或 TAB
以及那些表示动作而非字符的按键，请使用下列代码：
按键
代码
BACKSPACE
{BACKSPACE}, {BS}, 或
{BKSP}
BREAK
{BREAK}
CAPS LOCK
{CAPSLOCK}
DEL or DELETE
{DELETE} 或 {DEL}
DOWN ARROW
{DOWN}
END
{END}
ENTER
{ENTER}或 ~
ESC
{ESC}
HELP
{HELP}
HOME
{HOME}
INS or INSERT
{INSERT} 或 {INS}
LEFT ARROW
{LEFT}
NUM LOCK
{NUMLOCK}
PAGE DOWN
{PGDN}
PAGE UP
{PGUP}
PRINT SCREEN
{PRTSC}
RIGHT ARROW
{RIGHT}
SCROLL LOCK
{SCROLLLOCK}
TAB
{TAB}
UP ARROW
{UP}
F1
{F1}
F2
{F2}
F3
{F3}
F4
{F4}
F5
{F5}
F6
{F6}
F7
{F7}
F8
{F8}
F9
{F9}
F10
{F10}
F11
{F11}
F12
{F12}
F13
{F13}
F14
{F14}
F15
{F15}
F16
{F16}
为了指定那些与 SHIFT、CTRL 及 ALT
等按键结合的组合键，可在这些按键码的前面放置一个或多个代码，这些代码列举如下：
按键
代码
SHIFT
+
CTRL
^
ALT
%
为了说明在按下其它按键时应同时按下 SHIFT、CTRL、及 ALT
的任意组合键，请把那些按键的码放在括号当中。例如，为了说明按下 E 与 C 的时候同时按下 SHIFT 键，请使用
"+(EC)"。为了说明在按下 E 的时候同时按下 SHIFT 键，但接着按 C 而不按 SHIFT，则使用
"+EC"。
为了指定重复键，使用 {key number} 的形式。必须在 key 与
number 之间放置一个空格。例如，{LEFT 42} 意指 42 次按下 LEFT ARROW 键；{h 10} 则是指 10 次按下 H 键。
注意 不能用 SendKeys
将按键消息发送到这样一个应用程序，这个应用程序并没有被设计成在 Microsoft Windows 中运行。Sendkeys
也无法将 PRINT SCREEN 按键 {PRTSC}
发送到任何应用程序。
第一步，通过FindWindow函数获取到B的句柄;
第二步，通过BringWindowToTop函数操作B的句柄即可实现。
Private Sub Form_Click()
frm2.Form_Click() '在frm1 里执行 frm2 的
From_Click 代码
End Sub
