关于vb.net进程转移的信息

vb.net如何彻底退出进程？

主窗体代码调用Me.close不就可以了吗？或者在任意代码处调用Application.Exit()。如果不起作用的话是因为你在窗体关闭的事件中调用了e.Handle=True

相关问答

Q1: vb.net 怎样控制其它应用程序

很简单，取到程序句柄，之后找到想控制的控件，通过程序给他改值或控制就可以了

Q2: 各们，请教怎么使用vb.net编写两个进程间消息

两个方法

1.

要接收的窗口先使用FindWindow这个api获得句柄

调用SetForegroundWindow使其获得焦点并选中

调用.net方法：SendKeys.Send方法发送

2.使用API的SendInput

Q3: vb.net 文件转移

在窗体上放置一个 Timer 控件，Interval 属性设置为 120000（120000毫秒=120秒=2分钟），Enabled 属性设置为 True，添加如下代码：

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

    Dim dDir1 As New System.IO.DirectoryInfo("C:\a")

    dDir1.MoveTo("D:\b")  '移动 C:\a 文件夹所有文件到 D:\b    

End Sub

Q4: 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我。