VB视频剪辑？？进来瞧瞧··
有一个WMV格式的视频，想用VB做剪辑，视频总共长1分钟，我只要0秒到20的这一段视频


咋弄啊？


有什么好的建议吗？》

[解决办法]
用MCI或用视频处理软件
[解决办法]

VB code

Option ExplicitPrivate Sub Command1_Click()Dim a() As ByteDim l As Longl = Int(FileLen("C:\12.WMV") / 3)Open "C:\12.WMV" For Binary As #1a = InputB(l, 1)Close #1Open "C:\13.WMV" For Binary As #1Put #1, , aClose #1End Sub
[解决办法]
探讨

VB code
Option Explicit

Private Sub Command1_Click()
Dim a() As Byte
Dim l As Long
l = Int(FileLen("C:\12.WMV") / 3)
Open "C:\12.WMV" For Binary As #1
a = InputB(l, 1)
Close #1
Open "C:\13.……