Xin's Blog

今天寫程序時(shí)遇到了一個(gè)問(wèn)題，就是想用VB調(diào)用一個(gè)外部程序，但調(diào)用一次就運(yùn)行一次外部程序。效果不好。后來(lái)就試用了下面的代碼。如果還可以。不知道還沒(méi)有比較好點(diǎn)的代碼。

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