vb.net激活窗口,vb打开代码窗口的方法

Vb.net中已知某程序的进程id，如果激活该程序并最大化？

使用ShowWindow函数，便可轻松控制窗口的显隐，最小化，最大化。

创新互联公司专注于永定企业网站建设,响应式网站设计,商城网站定制开发。永定网站建设公司,为永定等地区提供建站服务。全流程按需定制设计，专业设计，全程项目跟踪，创新互联公司专业和态度为您提供的服务

概述

函数功能：该函数设置指定窗口的显示状态。

函数原型：BOOL ShowWindow（HWND hWnd, int nCmdShow）；

*/第一个参数为句柄，第二个参数选下面的值

#define SW_HIDE 0

#define SW_SHOWNORMAL 1

#define SW_NORMAL 1

#define SW_SHOWMINIMIZED 2

#define SW_SHOWMAXIMIZED 3

#define SW_MAXIMIZE 3

#define SW_SHOWNOACTIVATE 4

#define SW_SHOW 5

#define SW_MINIMIZE 6

#define SW_SHOWMINNOACTIVE 7

#define SW_SHOWNA 8

#define SW_RESTORE 9

#define SW_SHOWDEFAULT 10

#define SW_FORCEMINIMIZE 11

#define SW_MAX 11

参数含义

hWnd:指窗口句柄。

nCmdShow：指定窗口如何显示。如果发送应用程序的程序提供了STARTUPINFO结构，则应用程序第一次调用ShowWindow时该参数被忽略。否则，在第一次调用ShowWindow函数时，该值应为在函数WinMain中nCmdShow参数。在随后的调用中，该参数可以为下列值之一：

SW_FORCEMINIMIZE：在WindowNT5.0中最小化窗口，即使拥有窗口的线程被挂起也会最小化。在从其他线程最小化窗口时才使用这个参数。

SW_HIDE：隐藏窗口并激活其他窗口。

SW_MAXIMIZE：最大化指定的窗口。

SW_MINIMIZE：最小化指定的窗口并且激活在Z序中的下一个顶层窗口。

SW_RESTORE：激活并显示窗口。如果窗口最小化或最大化，则系统将窗口恢复到原来的尺寸和位置。在恢复最小化窗口时，应用程序应该指定这个标志。

SW_SHOW：在窗口原来的位置以原来的尺寸激活和显示窗口。

SW_SHOWDEFAULT：依据在STARTUPINFO结构中指定的SW_FLAG标志设定显示状态，STARTUPINFO 结构是由启动应用程序的程序传递给CreateProcess函数的。

SW_SHOWMAXIMIZED：激活窗口并将其最大化。

SW_SHOWMINIMIZED：激活窗口并将其最小化。

SW_SHOWMINNOACTIVATE：窗口最小化，激活窗口仍然维持激活状态。

SW_SHOWNA：以窗口原来的状态显示窗口。激活窗口仍然维持激活状态。

SW_SHOWNOACTIVATE：以窗口最近一次的大小和状态显示窗口。激活窗口仍然维持激活状态。

SW_SHOWNORMAL：激活并显示一个窗口。如果窗口被最小化或最大化，系统将其恢复到原来的尺寸和大小。应用程序在第一次显示窗口的时候应该指定此标志。

不过顺便说一句，SendKeys会偶尔造成指令丢失，不可避免。不管你激活窗口还是最大化窗口或者锁定都没办法完全避免。

VB激活指定窗口，跪求大神

VB声明

Declare Function ShowWindow Lib "user32" Alias

"ShowWindow" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long

说明

控制窗口的可见性（在vb里使用：针对vb窗体及控件，请使用对应的vb属性）

返回值

Long，如窗口之前是可见的，则返回TRUE（非零），否则返回FALSE（零）

参数表

参数

类型及说明

hwnd

Long，窗口句柄，要向这个窗口应用由nCmdShow指定的命令

nCmdShow

Long，为窗口指定可视性方面的一个命令。请用下述任何一个常数

SW_HIDE

隐藏窗口，活动状态给令一个窗口

SW_MINIMIZE

最小化窗口，活动状态给令一个窗口

SW_RESTORE

用原来的大小和位置显示一个窗口，同时令其进入活动状态

SW_SHOW

用当前的大小和位置显示一个窗口，同时令其进入活动状态

SW_SHOWMAXIMIZED

最大化窗口，并将其激活

SW_SHOWMINIMIZED

最小化窗口，并将其激活

SW_SHOWMINNOACTIVE

最小化一个窗口，同时不改变活动窗口

SW_SHOWNA

用当前的大小和位置显示一个窗口，不改变活动窗口

SW_SHOWNOACTIVATE

用最近的大小和位置显示一个窗口，同时不改变活动窗口

SW_SHOWNORMAL

与SW_RESTORE相同

vb.net 怎样判断某个窗体是否打开

Dim F1 As New Datasystem.Form2 '实例化窗体

For Each na As Form In Application.OpenForms '打开窗体的集合

If na.ProductName = F1.ProductName AndAlso na.Name = F1.Name 0 Then '判断程序集的产品名称和窗体名称是否已存在打开的窗体中

If na.WindowState = FormWindowState.Minimized Then '判断窗体是否最小化

na.WindowState = FormWindowState.Normal '还原窗体

End If

na.Activate() '激活窗体

Return '返回

End If

Next

F1.Show() '如果没有打开的窗体中未找到，重新打开窗体

怎么使用vb恢复一个最小化的程序，并激活窗口？

Declare Function OpenIcon Lib "user32" Alias

"OpenIcon" (ByVal hwnd As Long) As Long

说明

恢复一个最小化的程序，并将其激活

返回值

Long，非零表示成功，零表示失败。会设置GetLastError

参数表

参数

类型及说明

hwnd

Long，欲恢复的窗口

注解

针对vb窗体，应使用vb的WindowState属性

关于vb.net调用Window API函数问题，获取焦点以及前置窗口

看起来是鼠标按住不放情况下导致焦点还保持在新建线程的窗口，然后又循环导致焦点切来切去引起闪烁。

试下在循环中的执行代码前加上 mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0) '释放鼠标左键