哪位大哥能帮忙给一下用vb打开mpeg格式视频的代码。小弟在这里先谢谢了

来源：百度知道 编辑：UC知道 时间：2024/05/17 23:54:37
我也不知道怎么说 就是有一个MPEG格式的视频文件 要用VB把它调用出来 是直接调用 没有选择的对话框的那种 大哥要是能做就帮帮忙 分数我现在就只有这么点了 完了给你补上 谢谢了

你指的是能把mpeg文件一帧一帧读出来的代码？

Private 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

Private Sub Command1_Click()
OpenUrl "E:\aaa.MPEG"
End Sub

Private Sub OpenUrl(tUrl As String)
ShellExecute Me.hwnd, "Open", tUrl, 0, 0, 0
End Sub