vb.net - 如何在我使用该 VB 窗体启动的进程的 VB 窗体中获取进程 ID？

Question

我正在使用我在 VB2005 中创建的表单在按下按钮时打开程序，然后在文本字段中显示进程 ID(再次按下按钮时)。当我运行它时，表单将打开程序 (Notepad.exe) 但当我单击按钮查看进程 ID Visual Studio 2005 时说:

InvalidCastException 未处理并突出显示“TextBox1.Text = ProcID”行

Imports System
Imports System.Diagnostics

Public Class Form1

    Dim myProcess As New Process
    Dim ProcID

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Launch.Click
        myProcess.StartInfo.FileName = "notepad.exe"
        myProcess.Start()
    End Sub

    Private Sub GetID_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GetID.Click
        ProcID = Process.GetCurrentProcess()
        TextBox1.Text = ProcID
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub

End Class

当我尝试通过以下方式将 ProcID 声明更改为字符串时:

    Dim ProcID As String

VS2005 报错:

Value of type 'System.Diagnostics.Process' cannot be converted to 'String'.

我试过将 Dim ProcID 声明为整数并得到:

Value of type 'System.Diagnostics.Process' cannot be converted to 'Integer'.

我也尝试了以下更改但没有运气:

Private Sub GetID_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GetID.Click
    ProcID = Process.GetCurrentProcess(myProcess)
    TextBox1.Text = CInt(ProcID)
End Sub

该错误说:

Class 'System.Diagnostics.Process' cannot be indexed because it has no default property.

请帮忙!这真让我抓狂!

谢谢

Answer 1

以下更改将为您提供进程 ID 并将其放入文本框中。

 ProcID = Process.GetCurrentProcess.Id
 TextBox1.Text = ProcID.ToString

如果您有问题，请发表评论。