ByteScout Screen Capturing SDK – VB.NET – Record Video from Web Cam in Full Screen Only

Home
/
Articles
/
ByteScout Screen Capturing SDK – VB.NET – Record Video from Web Cam in Full Screen Only

printable version:
ByteScout-Screen-Capturing-SDK-VB-NET-Record-Video-from-Web-Cam-in-Full-Screen-Only.pdf

How to record video from web cam in full screen only in VB.NET and ByteScout Screen Capturing SDK

Tutorial on how to record video from web cam in full screen only in VB.NET

The documentation is designed to help you to implement the features on your side. ByteScout Screen Capturing SDK: the tool for developers who want to add screen capturing in their application. Can record screen into video and into single screenshots. Output formats are WMV, AVI, WebM for video and PNG for screenshots. You can adjust output video size, quality, resolution, framerate, video and audio codecs. Includes special privacy features for blacking out sensitive information on screen. Can also capture video from web camera, can add overlays with text or images. It can record video from web cam in full screen only in VB.NET.

This rich sample source code in VB.NET for ByteScout Screen Capturing SDK includes the number of functions and options you should do calling the API to record video from web cam in full screen only. Just copy and paste the code into your VB.NET application’s code and follow the instruction. This basic programming language sample code for VB.NET will do the whole work for you to record video from web cam in full screen only.

Trial version of ByteScout Screen Capturing SDK can be downloaded for free from our website. It also includes source code samples for VB.NET and other programming languages.

On-demand (REST Web API) version:
Web API (on-demand version)

On-premise offline SDK for Windows:
60 Day Free Trial (on-premise)

Module1.vb

      Imports System.Threading
Imports System.Diagnostics

Imports BytescoutScreenCapturingLib ' import bytescout screen capturer activex object

' NOTE: if you are getting error like "invalid image" related to loading the SDK's dll then 
' try to do the following:
' 1) remove the reference to the SDK by View - Solution Explorer
' then click on References, select Bytescout... reference name and right-click it and select Remove
' 2) To re-add click on the menu: Project - Add Reference
' 3) In "Add Reference" dialog switch to "COM" tab and find Bytescout...
' 4) Select it and click "Add" 
' 5) Recompile the application 
' Note: if you need to run on both x64 and x86 then please make sure you have set "Embed Interop Types" to True for this reference

Module Module1

    Sub Main()
	' create capturer class
        Dim capturer As New Capturer()
        ' set capturing mode to capture from web cam only
        capturer.CapturingType = CaptureAreaType.catWebcamFullScreen

        ' set web cam name to capture from
        capturer.CurrentWebCamName = "USB"

        ' output video filename
        capturer.OutputFileName = "WebCamOnly.wmv" ' set output video filename to .WMV or .AVI file

        ' set width and height of output video
        capturer.OutputWidth = 640
        capturer.OutputHeight = 480

	' // WMV and WEBM output use WMVVideoBitrate property to control output video bitrate
   	' // so try to increase it by x2 or x3 times if you think the output video are you are getting is laggy
	' capturer.WMVVideoBitrate = capturer.WMVVideoBitrate * 2


        ' uncomment to set Bytescout Lossless Video format output video compression method
        ' do not forget to set file to .avi format if you use Video Codec Name
        ' capturer.CurrentVideoCodecName = "Bytescout Lossless"            
        
	' uncomment to enable recording of semitransparent or layered windows (Warning: may cause mouse cursor flickering)
	' capturer.CaptureTransparentControls = true

        ' start capturing
        capturer.Run()

	'// IMPORTANT: if you want to check for some code if need to stop the recording then make sure you are 
	'// using Thread.Sleep(1) inside the checking loop, so you have the loop like
	'// Do {
	'// Thread.Sleep(1) 
	'// }
	'// While(StopButtonNotClicked);


        Console.WriteLine("Capturing entire screen for 15 seconds...")

        ' wait for 15 seconds
        Thread.Sleep(15000)

        ' stop capturing and flush AVI video file into the disk
        capturer.Stop()

        ' Release(Resources)
        System.Runtime.InteropServices.Marshal.ReleaseComObject(capturer)
        capturer = Nothing


        Console.WriteLine("Done")

        ' open the output video 
        Process.Start("WebCamOnly.wmv")

    End Sub

End Module