首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

VB视频剪辑?进来瞧瞧··该如何处理

2012-03-05 
VB视频剪辑??进来瞧瞧有一个WMV格式的视频,想用VB做剪辑,视频总共长1分钟,我只要0秒到20的这一段视频咋弄

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.……

热点排行