VB.NET启动并监测外部程序

2016-01-29 12:05 75 1 收藏

VB.NET启动并监测外部程序,VB.NET启动并监测外部程序

【 tulaoshi.com - vb 】

  你再也不需要使用Win32应用编程接口或者VB的Shell函数来启动外部应用程序了。因为你可以使用.NET框架中的System.Diagnostics.Process类来进行这个操作,从而进一步简化代码。

  虽然.NET使很多事情变得更加复杂,但是启动外部应用程序不在此列。在传统VB程序中,你可以使用Shell函数启动一个应用程序。当你传送一个数据文件名的时候,VB在相应应用程序中打开这个数据文件。你可以使用一个任选的windowstyle参数控制所启动的应用程序的窗口方式。例如,在VB6中,下面这行代码将启动默认的文本编辑器(通常是记事本)并打开文件"c:somepathsomefile.txt":

returnID = Shell("c:somepathsomefile.txt", vbNormalFocus)

  通过Microsoft.VisualBasic.Comaptibility域名空间,在VB.NET中仍然能够使用Shell功能,并且它已经被做了一些改动,但在.NET框架中它并不是启动应用程序的最好的方法,因为Shell函数有一些严格的限制条件,其中之一就是只能异步地启动程序;在启动应用程序之后,你自己的程序才继续运行。所以你不能直接使用它来启动一个程序,并且只能等到这个程序退出,你才能返回到你自己的程序中。为了在传统VB中做到这点,你必须求助于Windows API,而这需要对窗口句柄、过程识别号、枚举最高级窗口等有所了解。

  使用.NET,就能使这个操作变得很简单。你可以使用System.Diagnostics域名空间中的Process类来启动外部程序。你可以简单的使用共享的Process.Start方法启动一个新的过程,把一个可执行文件名或者可执行应用程序的扩展关联文件名作为参数传输给它。例如,下面的代码启动"c:somepathsomefile.txt"文件。

System.Diagnostics.Process.Start ("c:somepathsomefile.txt")

  Start方法有一个超载的版本,能返回一个Process对象,所以你可以获得对启动的过程的引用,并可用于多种用途:

Dim myProcess As Process = System.Diagnostics.Process.Start
("c:somepathsomefile.txt")
MessageBox.Show(myProcess.ProcessName)

  初看起来,你看上去好象丧失了控制窗口风格的能力(还记得Shell函数的第二个参数吗?),但是事实情况并非如此。在很多情况下,你不需要明确地设置窗口风格,因为默认情况是在一个带有焦点的正常窗口(ProcessWindowStyle.Normal)中启动过程。但是如果你想使用一个不同的窗口风格时,可以使用超载的Process.Start方法接收一个ProcessStartInfo对象参数而不是一个简单的字符串。为了使用它,首先要创建一个ProcessStartInfo对象,然后设置进程初置值。两个超载方法让你设置一个文件名或者一个文件名和一组命令行参数。并且ProcessStartInfo对象还有一个WindowStyle属性,由System.Diagnostics.Process.WindowStyle枚举的值组成。所以你可以调用Process.Start方法并传送一个ProcessStartInfo对象来控制启动的窗口的风格。

Dim psInfo As New _
System.Diagnostics.ProcessStartInfo _
("c:somepathsomefile.txt")
psInfo.WindowStyle = _
System.Diagnostics.ProcessWindowStyle.Normal
Dim myProcess As Process = _
System.Diagnostics.Process.Start(psInfo)

  由于Process类有一个StartInfo属性,它是一个ProcessStartInfo对象,所以另一种产生相同结果的方法是创建一个Process对象并设置它的StartInfo属性。在预创建的Process对象的时候,你可以仅仅调用它的Start方法,而不需使用Process类的共享Start方法。

Dim myProcess As System.Diagnostics.Process = _
new System.Diagnostics.Process()
myProcess.StartInfo.FileName = _
"c:somepathsomefile.txt"
myProcess.StartInfo.WindowStyle = _
System.Diagnostics.ProcessWindowStyle.Normal
myProcess.Start


来源:http://www.tulaoshi.com/n/20160129/1484593.html

延伸阅读
一、控件名.DataBindings.Add("属性名", dataset_system.Tables("Company"), dataset_system.Tables("Company").Columns.Item(i).Caption) 属性: 如() 'TEXT' 二、ListBox与ComboBox的数所绑定 Me.ComboBox1.DataSource = dataset_system.Tables("表名") Me.ComboBox1.DisplayMember = "字段名1" Me.ComboBox1.ValueMember = "字段名2" ...
标签: vb
二、语法 很久以来,VB因为缺乏完善的面向对象支持、缺乏高效的错误处理机制和性能表现不佳,因而一直受到某些人的嘲笑。VB.NET将彻底改变这种情况。然而,VB.NET在这些方面的改进也要付出代价,许多旧的代码需要手工进行转换才能在VB.NET下运行。 下面几个表格总结了VB.NET语言在语法上的改动之处。注意这些表格并没有完全列出所有...
标签: vb
前言 大约到2001年的第4季度,Visual Basic的下一个版本Visual Basic.NET将会正式发行。新版的Visual Basic.NET拥有许多VB开发者以前只能梦想的新功能和新特色。同时,成长和发展也意味着付出一定的代价,新的Visual Basic.NET中有许多东西需要重新学习,一些细微的变化很可能带来出乎意料的麻烦。 Microsoft .NET平台所包含的内容非...
标签: vb
三、完善的面向对象支持 VB.NET提供了完善的面向对象编程支持,是一种真正的OO语言。 完善的面向对象支持应该包括封装(Encapsulation),继承(Inheritance)和多态性(Polymorphism)。当前的VB6已经部分地实现了这些支持,但仍因某些地方未能符合标准而受到责难。 封装是指对象只显露公用的方法和属性。VB6已经提供了健壮的...
Private Sub Form1_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing If MsgBox("請注意看關閉的視窗", MsgBoxStyle.Question + MsgBoxStyle.OKCancel, "關閉") = MsgBoxResult.OK Then Dim d As Double For d = 1 To 0 + 0.2 Step -0.2 System.Threading.Thread.Sleep(50) Applic...

经验教程

328

收藏

14

精华推荐

VB.NET注册表编程

VB.NET注册表编程

词典里的小结局

C# to VB.Net translator..

C# to VB.Net translator..

w_kuichn

VB和VB.NET中的XML操作

VB和VB.NET中的XML操作

Dear晓宁児

微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部