Question

VB根据进程名获取对应窗体标题

【情景介绍】我在窗体中放了一个List1,Command1和Label1,在Form_Load中输入Set objWMIServer = GetObject("winmgmts:\\.\root\cimv2")Set colProcesses = objWMIServer.ExecQuery("Select * from Win32_process")For Each Process In colProcessesList1.AddItem Process.CaptionNext这样程序一运行,在List1中就列出当前系统中运行的所有进程的名称【问题描述】我想实现的效果是,当选中List1中的一项进程后,再按下Command1,在Label1中就显示出选中进程所对应的窗体的标题。请问如何写代码？【奖励说明】悬赏20分,答对者追加不少于20分的分数

Answer 1

hw& = GetForegroundWindow() '得到活动窗口的句柄
hwstr = Trim(getCaption(hw&)) '根据句柄得到标题

关键是得到句柄，然后就可以得到标题