vb.net添加监视的简单介绍

vb.net中如何设计一个监控程序？

以记事本为例

成都创新互联拥有一支富有激情的企业网站制作团队，在互联网网站建设行业深耕十多年，专业且经验丰富。十多年网站优化营销经验，我们已为超过千家中小企业提供了网站设计、成都做网站解决方案，按需设计网站，设计满意，售后服务无忧。所有客户皆提供一年免费网站维护!

Public Class Form1

Public Sub ShellAndWait(ByVal ProcessPath As String)

Dim objProcess As System.Diagnostics.Process

Try

objProcess = New System.Diagnostics.Process()

objProcess.StartInfo.FileName = ProcessPath

objProcess.StartInfo.WindowStyle = ProcessWindowStyle.Normal

objProcess.Start()

objProcess.WaitForExit()

objProcess.Close()

Catch

MessageBox.Show("无法执行文件 " ProcessPath, "错误")

End Try

End Sub

'监视程序就可以了，若果监视别的窗体的话，用SPY++ 找到句柄，配合FindWindowEx，SendMessage根据其属性做

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

ShellAndWait("Notepad.exe")

MessageBox.Show("笔记本被关闭后我才会出现")

End Sub

End Class

在VB环境中执行源代码，本身就是调试模式

按F8即可逐语句运行

点击语句左端空白处，将其背景色变为深红，就是添加断点，运行到该语句会停下来

可以在变量、对象等语句上点击右键，选择“添加监视”即可

当进程出现时,向记事本 EDIT 控件发送消息(使用API SendMessageA) dim a as string a=space 1000 SendMessageA（hwnd,D,1000,a） a就是取得的文本

2005程序运行到断点处，右键可以添加到监视窗口。

一般都可以在工具--自定义里找到。

网页标题：vb.net添加监视的简单介绍
网站地址：http://scyanting.com/article/ddocsss.html