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

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

目前创新互联公司已为上1000+的企业提供了网站建设、域名、网页空间、网站托管运营、企业网站设计、秦皇岛网站维护等服务，公司将坚持客户导向、应用为本的策略，正道将秉承"和谐、参与、激情"的文化，与客户和合作伙伴齐心协力一起成长，共同发展。

概述

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

函数原型：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.NET 如何获取本身的进程名

Process.GetCurrentProcess.ProcessName

'--------------------

百度VB2010(VB.NET)吧建设发展中,需要你的支持和帮助!!!

快加入我们吧!发表你的疑问,经验,程序,分享..

让我们共同进步!

求大神指点vb.net怎么获取指定进程的状态

Process.GetProcessesByName("进程名")‘不带扩展名

找不到 就是没有在运行，但不知道能不能判断已暂停状态。

vb.net 窗口句柄获取进程名

FindWindowEx

VB声明

Declare Function FindWindowEx Lib "user32" Alias

"FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As

String, ByVal lpsz2 As String) As Long

说明

在窗口列表中寻找与指定条件相符的第一个子窗口

返回值

Long，找到的窗口的句柄。如未找到相符窗口，则返回零。会设置GetLastError

参数表

参数

类型及说明

hWnd1

Long，在其中查找子的父窗口。如设为零，表示使用桌面窗口（通常说的顶级窗口都被认为是桌面的子窗口，所以也会对它们进行查找）

hWnd2

Long，从这个窗口后开始查找。这样便可利用对FindWindowEx的多次调用找到符合条件的所有子窗口。如设为零，表示从第一个子窗口开始搜索

lpsz1

String，欲搜索的类名。零表示忽略

lpsz2

String，欲搜索的类名。零表示忽略

vb.net 如何根据进程名字来取得进程的pid?

''' summary

''' 返回某进程PID

''' /summary

''' param name="ProcessName"进程名(不带后缀)/param

''' returns/returns

''' remarks/remarks

Public Function ProcessPidOnly(ByVal ProcessName As String) As String

Dim myProcess As Process() = Process.GetProcessesByName(ProcessName)

Dim pid As String = ""

If myProcess.Length - 1 = 0 Then

pid = myProcess(0).Id

Else

For i As Short = 0 To myProcess.Length - 1

pid = pid myProcess(i).Id ";"

Next

End If

Return pid

End Function

vb.net 怎么结束进程

好像不难吧？

我放进了Button1的Click事件里。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

On Error GoTo Errmessages '在做系统操作时加排错标签是个好习惯

Dim TargetName As String = "ibmdict" '存储进程名为文本型，注：进程名不加扩展名

Dim TargetKill() As Process = Process.GetProcessesByName(TargetName) '从进程名获取进程

Dim TargetPath As String '存储进程路径为文本型

If TargetKill.Length 1 Then '判断进程名的数量，如果同名进程数量在2个以上，用For循环关闭进程。

For i = 0 To TargetKill.Length - 1

TargetPath = TargetKill(i).MainModule.FileName

TargetKill(i).Kill()

Next

ElseIf TargetKill.Length = 0 Then '判断进程名的数量，没有发现进程直接弹窗。不需要的，可直接删掉该If子句

MsgBox("没有发现进程！")

Exit Sub

ElseIf TargetKill.Length = 1 Then '判断进程名的数量，如果只有一个，就不用For循环

TargetKill(0).Kill()

End If

MsgBox("已终止" TargetKill.Length "个进程") '弹窗提示已终止多少个进程

Errmessages: ‘定义排错标签

If Err.Description Nothing Then ’判断有无错误，如果有，则 ↓

MsgBox(Err.Description) '当出现错误时，弹窗提示

End If

End Sub

可根据需要自行修改，这个备注够完善了吧？不会的再Hi我。

网页名称：vb.net进程名 vbs进程名
URL分享：http://ybzwz.com/article/hjsdcs.html