VB. Net calls ffmpeg to simply process video (class Library-6)

There are a lot of them on the Internet C# The tutorial is about FFmpeg Video processing , Actually, change to VB.net, It's still the same

First download from the Internet to FFmpeg.exeFFmpeg-FFmpeg

And then FFmpeg.exe Drag it into your application folder

  Because it is related to class libraries , You can turn over what I wrote before call （ Class library 1-5）

Now open our class library , Create a new class （ Name yourself ）：VideoProcess

Public Class VideoProcess
    ''' <summary>
    '''  Add audio to the video , Pay attention to the duration of video and audio 
    ''' </summary>
    ''' <param name="ffmpeg"> Given FFmpeg Absolute path </param>
    ''' <param name="mp3"> Given audio path </param>
    ''' <param name="video"> Given video path </param>
    ''' <param name="out"> Path to output video </param>
    ''' <returns>null</returns>
    Public Function AddAudio(ffmpeg As String, mp3 As String, video As String, out As String)
        Process.Start(ffmpeg, "-i " & video & " -i " & mp3 & " -codec copy " & out)
        Return vbNull
    End Function
    ''' <summary>
    '''  Delete audio for video , Pay attention to the video duration of the original video and the duration of the original audio 
    ''' </summary>
    ''' <param name="ffmpeg"> Given FFmpeg Absolute path </param>
    ''' <param name="video"> Given video path </param>
    ''' <param name="out"> Path to output video </param>
    ''' <returns>null</returns>
    Public Function DeleteAudio(ffmpeg As String, video As String, out As String)
        Process.Start(ffmpeg, "-i " & video & " -c:v copy -an " & out)
        Return vbNull
    End Function


End Class

Put an audio on the desktop in advance , A video

  Private Sub Button9_Click(sender As Object, e As EventArgs) Handles Button9.Click
        GDIvid.AddAudio(Application.StartupPath & "\ffmpeg.exe", "C:\Users\Administrator\Desktop\105.mp3", "C:\Users\Administrator\Desktop\test.mp4", "C:\Users\Administrator\Desktop\test1.mp4")
    End Sub

    Private Sub Button10_Click(sender As Object, e As EventArgs) Handles Button10.Click
        GDIvid.DeleteAudio(Application.StartupPath & "\ffmpeg.exe", "C:\Users\Administrator\Desktop\test1.mp4", "C:\Users\Administrator\Desktop\test2.mp4")
    End Sub

After adding audio , The length of the video will change