VB使用shell函数打开外部exe程序的实现方法

 更新时间:2014年07月31日 16:13:06   投稿:shichen2014  
这篇文章主要介绍了VB使用shell函数打开外部exe程序的实现方法,是非常实用的一个功能,需要的朋友可以参考下
(福利推荐:【腾讯云】服务器最新限时优惠活动,云服务器1核2G仅99元/年、2核4G仅768元/3年,立即抢购>>>:9i0i.cn/qcloud

(福利推荐:你还在原价购买阿里云服务器?现在阿里云0.8折限时抢购活动来啦!4核8G企业云服务器仅2998元/3年,立即抢购>>>:9i0i.cn/aliyun

本文实例主要实现了VB调用外部exe程序来运行的功能,这里主要是使用shell函数来执行,shell函数主要用来打开一个外部的exe可执行文件,例如,在sub模块内:Shell "notepad", vbNormalFocus,代表以正常模式运行记事本程序,vbNormalFocus是shell的参数,意思是正常模式,当然它还有vbMaximizedFocus最大化模式,vbMinimizedFocus最小化模式,vbHide隐藏模式等多种运行方式可选择。

具体的代码例子及注释如下:

VERSION 5.00
Begin VB.Form Form1 
  Caption     =  "Form1"
  ClientHeight  =  3030
  ClientLeft   =  120
  ClientTop    =  450
  ClientWidth   =  4560
  LinkTopic    =  "Form1"
  ScaleHeight   =  3030
  ScaleWidth   =  4560
  StartUpPosition =  3 '窗口缺省
End
Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Explicit
Private Sub Form_Load()
Shell "notepad", vbNormalFocus
'shell函数可以用来运行一个外部可执行文件
'它的参数有:程序名(假如那个程序在不同文件夹,并且不是系统文件,则需要详细路径),运行方式
'假设你想要运行C盘根目录的ABC.EXE,则第一个参数需要:"C:\\ABC.EXE"
'顺带:如果路径或文件名中有空格的话,你还得在路径两边加双引号(建议不管有没有空格都加双引号),像这样:"""C:\\1 2.exe"""
'第二个参数常用参数有:vbNormalFocus正常模式,vbMaximizedFocus最大化模式,vbMinimizedFocus最小化模式,vbHide隐藏模式
End Sub

该程序运行后将直接打开Windows记事本程序,有兴趣的读者可以试着打开其它的可执行程序测试运行效果,或者进行个性化的修改以实现更为丰富的功能。

相关文章

最新评论

?


http://www.vxiaotou.com