Question

如何用VB调用外部的应用程序

在使用用vb编好的一个程序1过程中要用到另一个应用程序2（一个应用软件），功能是用这个应用软件对程序1对一个截图，然后把这个截图存在某个位置。高手指导下吧！我菜鸟！
最好举个例子，来段程序

Answer 1

使用Shell函数来调用外部的应用程序。

Shell 函数

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

Shell 函数示例
本示例使用 Shell 函数来完成一个用户指定的应用程序。
' 将第二个参数值设成 1，可让该程序以正常大小的窗口完成，并且拥有焦点。

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

Answer 2

1.用 Shell "" (引号内是文件名 如"c:/a.txt")
2.用 ShellExecute 一个API

Answer 3

shell ""可以完成打开一个外部exe程序，但是不知道是否符合你的要求！！！

Answer 4

shell "路径" ；先调用

然后
Private Declare Function GetDC Lib "user32" (ByVal hwnd As Long) As Long
Private Declare Function BitBlt Lib "gdi32" (ByVal hDestDC As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal dwRop As Long) As Long

Private Sub Form_Load()
Me.Hide
Me.AutoRedraw = True
BitBlt Me.hDC, 0, 0, Screen.Width, Screen.Height, GetDC(0), 0, 0, vbSrcCopy
sFile$ = "C:\" & Format(Now, "yyyymmddhhmmss") & ".BMP"
SavePicture Me.Image, sFile
MsgBox "当前屏幕图像已经保存到" & sFile, 64
End
End Sub ；保存截图