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

时间:2021-12-01 14:45:49

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

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

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
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记事本程序,有兴趣的读者可以试着打开其它的可执行程序测试运行效果,或者进行个性化的修改以实现更为丰富的功能。