Dim myProcess As New Process() '先定义一个进程变量 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click myProcess.StartInfo.FileName = "Notepad" myProcess.StartInfo.WindowStyle = ProcessWindowStyle.Maximized myProcess.Start() End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click myProcess.CloseMainWindow() '关闭进程 End Sub