Xin's Blog

今天寫程序時遇到了一個問題，就是想用VB調用一個外部程序，但調用一次就運行一次外部程序。效果不好。后來就試用了下面的代碼。如果還可以。不知道還沒有比較好點的代碼。

1Private Sub Command1_Click()
2
3    On Error GoTo 1
4    AppActivate "MPEG4 Media Player Version 1.3.0"
5    Exit Sub
61:      Shell "D:\tmSDK\DemoPlay_Win_1.3.0\Prog\MP4Player.exe " & "C:\VideoFile.mpg", vbNormalFocus
7
8End Sub
9