Skip to content

Instantly share code, notes, and snippets.

@jz5
Created June 10, 2015 21:15
Embed
What would you like to do?
Sub Main()
Dim writer = New AForge.Video.VFW.AVIWriter
writer.Codec = "MSVC"
writer.FrameRate = 15
writer.Open("out.avi", 800, 600) ' 800x600
writer.AddFrame(New System.Drawing.Bitmap(800, 600))
writer.Close()
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment