ByteScout Image To Video SDK - VB.NET - 60 Standard 2D Transition Effects - ByteScout

ByteScout Image To Video SDK – VB.NET – 60 Standard 2D Transition Effects

  • Home
  • /
  • Articles
  • /
  • ByteScout Image To Video SDK – VB.NET – 60 Standard 2D Transition Effects

60 standard 2d transition effects in VB.NET with ByteScout Image To Video SDK

60 standard 2d transition effects in VB.NET

Today we will explain the steps and algorithm of implementing 60 standard 2d transition effects and how to make it work in your application. 60 standard 2d transition effects in VB.NET can be implemented with ByteScout Image To Video SDK. ByteScout Image To Video SDK is the library for conversion of images into video slideshow. Provides built-in support for more than hundred of 2D and 3D transition effects. Output formats supported are AVI,WMV and WEBM video files. You may adjust output video size, quality, framerate and add audio.

Fast application programming interfaces of ByteScout Image To Video SDK for VB.NET plus the instruction and the VB.NET code below will help you quickly learn 60 standard 2d transition effects. This VB.NET sample code should be copied and pasted into your application’s code editor. Then just compile and run it to see how it works. Code testing will allow the function to be tested and work properly with your data.

Free trial version of ByteScout Image To Video SDK is available on our website. Get it to try other samples for VB.NET.

Try ByteScout Image To Video SDK today: Get 60 Day Free Trial or sign up for Web API

Module1.vb
      
Imports BytescoutImageToVideo Module Module1 Sub Main() Try Console.WriteLine("Converting JPG slides to video, 67 basic transition effects, please wait...") ' Create BytescoutImageToVideoLib.ImageToVideo object instance Dim converter As ImageToVideo = New ImageToVideo() ' Activate the component converter.RegistrationName = "demo" converter.RegistrationKey = "demo" ' Enable transition effects for the first first slide converter.UseInEffectForFirstSlide = True converter.Slides.DefaultSlideDuration = 1000 converter.Slides.DefaultSlideEffectDuration = 500 Dim bChangeSlide As Boolean = True ' temporary variable to change slides Dim i As Integer ' now try all 67 standard transition effects from 0 (none) to 67 For i = 0 To 67 ' Add slide image, set the duration Dim slide As Slide If (Not bChangeSlide) Then slide = converter.AddImageFromFileName("..\..\..\..\slide1.jpg") Else slide = converter.AddImageFromFileName("..\..\..\..\slide2.jpg") End If bChangeSlide = Not bChangeSlide ' switch to use another slide next tim slide.InEffect = i ' effect index Next ' Set output video size converter.OutputWidth = 320 converter.OutputHeight = 240 ' Set output video file name converter.OutputVideoFileName = "result.wmv" ' Run the conversion converter.RunAndWait() ' Release resources System.Runtime.InteropServices.Marshal.ReleaseComObject(converter) ' Open the result video file in default media player Process.Start("result.wmv") Console.WriteLine("Done. Press any key to continue...") Console.ReadKey() Catch ex As Exception Console.WriteLine("Error: " & ex.Message) Console.ReadKey() End Try End Sub End Module

Try ByteScout Image To Video SDK today: 60 Day Free Trial (on-premise version) or sign up for Web API (on demand version)

VIDEO

ON-PREMISE VERSION

Get 60 Day Free Trial or Visit ByteScout Image To Video SDK page

Explore ByteScout Image To Video SDK documentation

WEB API

Sign Up for free Web API key

Explore Web API Documentation

Tutorials:

prev
next