Question

VB能不能运行EXE文件？

Answer 1

1、shell函数（只能打开.exe）
http://tieba.baidu.com/f?kz=202094746
2、ShellExecute

VB声明

*****这个放在（通用）里面******
Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

ShellExecute ME.hWnd,vbNullString,vbNullString,vbNullString,"C:\1.exe",0

说明
查找与指定文件关联在一起的程序的文件名。关联的方式要么是运行程序，要么是打印文件。可用Windows注册表编辑器将特定的文件类型同应用程序关联起来。例如，扩展名为.TXT的文本文件通常与Windows记事本（NOTEPAD.EXE）关联到一起。如在文件管理器中双击含.TXT扩展名的一个文件，就会自行启动记事本程序，并在其中载入文本文件；或者将指定的文件打印出来
返回值
Long，大于32表示成功。请参考对FindExecutable函数的说明，了解具体的错误代码列表
参数表
参数 类型及说明
hwnd Long，指定一个窗口的句柄，有些时候，Windows程序有必要在创建自己的主窗口前显示一个消息框。如果发生这种情况，由这个参数指定的窗口就会作为消息框的父窗口使用。在VB环境中，通常将活动窗体的窗口句柄作为这个参数使用
lpOperation String，指定字串“Open”来打开lpFlie文档；或指定“Print”来打印它。也可设为vbNullString，表示默认为“Open”
lpFile String，想用关联的程序打印或打开的一个程序名或文件名
lpParameters String，如lpFile是一个可执行文件，则这个字串包含了传递给执行程序的参数。如lpFile引用的是一个文档文件，或者不需要使用参数，则设为vbNullString
lpDirectory String，想使用的默认路径完整路径
nShowCmd Long，定义了如何显示启动程序的常数值。参考ShowWindow函数的nCmdShow参数
注解
这个函数的说明在MSDN里是这样的：Opens or prints a specified file

Answer 2

VB可通过Shell 函数来运行EXE文件。

Shell 函数

执行一个可执行文件，返回一个 Variant
(Double)，如果成功的话，代表这个程序的任务 ID，若不成功，则会返回 0。

Shell 函数示例

本示例使用 Shell 函数来完成一个用户指定的应用程序。

' 将第二个参数值设成 1，可让该程序以正常大小的窗口完成，并且拥有焦点。

Dim RetVal
RetVal = Shell("C:\WINDOWS\system32\CALC.EXE", 1)   ' 完成Calculator。

Answer 3

'Set xlApp = CreateObject("Excel.Application") '创建EXCEL对象
'Set xlBook = xlApp.Workbooks.Open("文件名") '打开已经存在的EXCEL工件簿文件
'xlApp.Worksheets("表名").Range("A1").Cells(行,列) = 值
'xlApp.Visible = True '设置EXCEL对象可见（或不可见）
'Windows("文件名.xls").Activate'设置活动工作簿
'Sheets("表名").Select'设置活动工作表
'Range("K12").Select 设置活动单元格
'xlSheet.Cells(Row, col) = 值 '给单元格（row,col）赋值
'xlSheet.PrintOut '打印工作表
'xlBook.Close (True) '关闭工作簿.............................................
'xlApp.Quit '结束EXCEL对象....................................................
'Set xlApp = Nothing '释放xlApp对象.............................................!!!
'xlBook.RunAutoMacros (xlAutoOpen) '运行EXCEL启动宏
'xlBook.RunAutoMacros (xlAutoClose) '运行EXCEL关闭宏
'xlBook.Worksheets.Count '工作簿标签总数

Answer 4

用Shell即可

简单使用：
shell "c:\windows\calc.exe"

可用参数：
Shell "c:\windows\calc.exe", vbHide
Shell "c:\windows\calc.exe", vbMaximizedFocus
Shell "c:\windows\calc.exe", vbMinimizedFocus
Shell "c:\windows\calc.exe", vbMinimizedNoFocus
Shell "c:\windows\calc.exe", vbNormalFocus
shell "c:\windows\calc.exe",vbNormalNoFocus
后面的参数可以隐藏、聚焦最大化、聚焦最小化，最小化不聚焦、正常聚焦、正常不聚焦。试试你就知道了，很简单的。

Answer 5

能。shell 命令