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

203 阅读 0 评论 134 点赞

我是靠谱客的博主潇洒台灯，最近开发中收集的这篇文章主要介绍VB使用shell函数打开外部exe程序的实现方法，觉得挺不错的，现在分享给大家，希望可以做个参考。

概述

本文实例主要实现了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记事本程序，有兴趣的读者可以试着打开其它的可执行程序测试运行效果，或者进行个性化的修改以实现更为丰富的功能。