vb如何用avi的api提取avi文件里的wav音频?

hc2008l5 2019-08-23 04:28:25
vb如何用avi的vfw系列api提取avi文件里的wav音频?
...全文
479 6 打赏 收藏 举报
写回复
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
hc2008l5 2021-05-21
https://bbs.csdn.net/topics/330009825
  • 打赏
  • 举报
回复
hc2008l5 2020-07-01
https://blog.csdn.net/imxiangzi/article/details/80265978
  • 打赏
  • 举报
回复
hc2008l5 2020-04-03
https://bbs.csdn.net/topics/425942
  • 打赏
  • 举报
回复
东方之珠 2020-03-20
把它简单化,用shell调用FFmpeg:
Private Declare Function GetShortPathName Lib "kernel32.dll" Alias "GetShortPathNameA" (ByVal lpszLongPath As String, ByVal lpszShortPath As String, ByVal cchBuffer As Long) As Long
           '设置输出文件
           Dim S As String
           Dim Inputfile As String '输入文件
           Dim Outputfile As String '输出文件
           Outputfile = "D:\OutPutFile.wav"
           If Dir(Outputfile) = "" Then '文件不存在则创建
              FileNumber = FreeFile
              Open cjlT1 For Binary As #FileNumber
              Put #FileNumber, , Chr(0)
              Close #FileNumber
           End If
           S = String(LenB(Outputfile), Chr(0))
           GetShortPathName Outputfile, S, Len(S)
           Outputfile = left(S, InStr(S, Chr(0)) - 1)
           '设置环境变量以支持FFmpeg输入文件路径
           FileNumber = SetEnvironmentVariable("Path", FFmpegPath) '设置FFmpeg文件所在路径
           S = "ffmpeg -i """ & Inputfile & """ -f wav -acodec pcm_s16le -ac 1 -y " & Outputfile
           Call Shell(S, vbHide)
  • 打赏
  • 举报
回复
hc2008l5 2020-03-12
https://blog.csdn.net/dengdun6257/article/details/102283225
  • 打赏
  • 举报
回复
hc2008l5 2019-08-23
up
up
up
  • 打赏
  • 举报
回复
发帖
多媒体
加入

807

社区成员

VB 多媒体
社区管理员
  • 多媒体
申请成为版主
帖子事件
创建了帖子
2019-08-23 04:28
社区公告
暂无公告