Platform :

Popular Solution Go   Back

VB.NET - How to convert video file to Animated GIF format in VB.Net Sample

Step 1: Download Video Edit Gold ActiveX setup disk and installed it.

Step 2: Create New Visual Basic Project, select Windows Application.

Step 3: Select Component Tab in Toolbox, Right Click mouse and Select Add/Remove Items...  , Select VideoEdit Gold  Control.

Step 4: Drag the VideoEdit Gold Control from Components Tab to form.

Step 5: Add Button on form.

Step 6: Add following code in Button click event.

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim idur As Double
    Dim strInputVideo As String
    strInputVideo = "c:\yourvideo.wmv"
    idur = AxVideoEdit1.GetFileDuration(strInputVideo)
    AxVideoEdit1.VideoSampleSize = 24
    AxVideoEdit1.AddVideo(strInputVideo, 0, idur, 0)
    AxVideoEdit1.AddAudio(strInputVideo, 0, idur)

End Sub

Step 7: double click the VideoEdit Gold control, add following code in Complete event.

Private Sub AxVideoEdit1_Complete(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles      AxVideoEdit1.Complete             

End Sub

 Step 8: Now you can run the sample.