快速运用VB.NET SHELL函数

开发 后端
这里介绍VB.NET SHELL函数的功能是执行一个可执行文件,同时返回一个Variant(Double),如果调用成功的话,返回一个任务标识(TaskID),它是执行程序的唯一标识,若不成功,则会返回0。

在这和大家分析一下关于VB.NET SHELL函数的调用。在VB中,还可以调用各种应用程序,也就是说,凡能够在DOS或Windows下运行的应用程序,基本上都可在VB中调用。这一功能可通过VB.NET SHELL函数来实现。

它的语法结构如下:

  1. Shell(pathname[,windowstyle]) 

参数说明:

pathname为所要执行的应用程序的名称及其路径和必要的参数;

windowstyle表示在程序运行时窗口的样式。其中的参数windowstyle的设置及其说明如下表:

设置值 常数 说明
0 vbHide 窗口被隐藏,且焦点会移到隐藏式窗口
1 vbNormalFocus 窗口具有焦点,且会还原到它原来的大小和位置
2 vbMinimizedFocus 窗口会以一个具有焦点的图标来显示
3 vbMaximizedFocus 窗口是一个具有焦点的最大化窗口
4 vbNormalNoFocus 窗口会被还原到最近使用的大小和位置,而当前活动的窗口仍然保持活动
6 vbMinimizedNoFocus 窗口会以一个图标来显示,而当前活动的窗口仍然保持活动

如果windowstyle省略,则程序是以具有焦点的最小化窗口来执行的。

VB.NET SHELL函数的功能是执行一个可执行文件,同时返回一个Variant(Double),如果调用成功的话,返回一个任务标识(TaskID),它是执行程序的唯一标识,若不成功,则会返回0。例如:

  1. x=Shell(c:\winword\winword.exe",3) 

该语句调用“WordforWindows”,并把ID返回给x。注意,在具体输入程序时,ID不能省略。上面的语句不能写成:

  1. Shell(c:\winword\winword.exe",3) 

必须在前面加上“x=”(可以用其它变量名)。

例1:设计程序:    

在窗体的form_load()事件中添加如下代码:

  1. PrivateSubForm_load()  
  2. Dimstr1asstring'定义一个字符串变量用于存储程序执行的情况  
  3. Form1.hide'隐藏窗体  
  4. str1=Shell("c:\windows\system32\calc.exe",1)'调用c:\windows\system32\calc.exe程序,将参数windowstyle设置为1,可让程序以正常大小的窗口完成并且拥有焦点  
  5. EndSub  

程序说明:程序首先定义一个字符串变量,用于存储程序执行的情况,如果运行正常,就会返回所调用应用程序的ID,否则就会返回0;,然后通过Form1.hide来隐藏窗体;最后str1=Shell("c:\pwin95\calc.exe",1)来完成对win95的计算器应用程序的调用。

【编辑推荐】

  1. 全方位分析VB.NET编码规范
  2. 剖析VB.NET Process的属性与对象
  3. VB.NET SendKeys方法与键入值
  4. 用实例讲述VB.NET Process类
  5. 简单讲述VB.NET表间拖放
责任编辑:田树 来源: 博客
相关推荐

2009-11-02 13:54:27

VB.NET shel

2009-10-19 17:42:31

VB.NET API函

2009-11-03 09:37:33

VB.NET重载

2009-10-09 16:11:33

VB.NET语法

2009-11-02 10:30:37

VB.NET EXCE

2009-10-15 17:50:48

VB.NET Spli

2009-10-28 13:23:52

VB.NET可选参数

2009-11-02 12:35:10

VB.NET追加文件

2009-11-02 11:02:58

VB.NET XML文

2009-11-10 15:52:20

VB.NET变量名

2009-10-21 10:45:50

VB.NET Quic

2009-10-30 13:31:06

VB.NET名空间

2009-10-29 16:29:02

VB.NET文件系统对

2009-10-09 16:00:34

VB6.0开发

2009-10-29 17:15:26

VB.NET控件

2009-11-10 16:55:05

VB.NET调用API

2009-10-26 10:44:27

VB.NET API函

2010-01-18 10:33:28

VB.NET基本函数

2009-11-02 13:14:18

VB.NET函数

2009-11-02 17:54:44

VB.NET数组
点赞
收藏

51CTO技术栈公众号