Question

vb.net设置windows焦点程序

RT,我想让vb.net 控制windows的焦点,切换到指定程序并焦点在这个程序之上供用户使用,有没有什么办法(比如打开了ie,按某个按扭就切换到已打开的IE),谢谢了

Answer 1

给你个参考的例子，窗体打开时可能大小有变化，软件名可能有变化
先加个控件ListBox1，运行后双击ListBox1上程序名
Public Class Form1
Public myProcess() As Process
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim myProcesses() As Process = Process.GetProcesses()
Dim jh As New ArrayList
For Each bs As Process In myProcesses
If CInt(bs.MainWindowHandle) > 0 Then
ListBox1.Items.Add(bs.ProcessName)
jh.Add(bs)
End If
Next
ReDim myProcess(jh.Count - 1)
jh.CopyTo(myProcess)
End Sub
Declare Function ShowWindow Lib "user32" Alias "ShowWindow" (ByVal hwnd As Integer, ByVal nCmdShow As Long) As Integer
Private Sub ListBox1_MouseDoubleClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ListBox1.MouseDoubleClick
Dim a As Process = myProcess(ListBox1.SelectedIndex)
Try
Dim dd = ShowWindow(a.MainWindowHandle, &H1)
AppActivate(a.Id)
Catch ex As Exception
End Try
End Sub
End Class

追问

我试下,谢谢 不知道对根据进程名或是窗口的标题名.

Answer 2

查找当前系统中的进程，sendMessage

追问

有没有确切的代码,api函数这块我不是很懂

追答

我没有现成的源码，你可以从网上查找一下，vb枚举系统进程，和sendMessage的用法