Every ByteScout tool contains example VB.NET source codes that you can find here or in the folder with installed ByteScout product. ByteScout Watermarking SDK was made to help with simpleverticaltext (vb in VB.NET. ByteScout Watermarking SDK is the software development kit that helps to quickly implement adding of watermarks on top of PNG, JPG, BMP images as well as on multipaged TIFF files. You may select ready to use presets or create your own preset with semitransparent logo images, text lines with adjustable font size, family, color, rotation.
The SDK samples like this one below explain how to quickly make your application do simpleverticaltext (vb in VB.NET with the help of ByteScout Watermarking SDK. Follow the instruction and copy – paste code for VB.NET into your project’s code editor. Writing VB.NET application typically includes multiple stages of the software development so even if the functionality works please test it with your data and the production environment.
Our website provides free trial version of ByteScout Watermarking SDK that includes source code samples to help with your VB.NET project.
Imports System.Drawing Imports Bytescout.Watermarking Imports Bytescout.Watermarking.Presets Module Module1 Sub Main() ' Create Watermarker instance Dim waterMarker = New Watermarker() Dim inputFilePath As String Dim outputFilePath As String ' Initialize library waterMarker.InitLibrary("demo", "demo") ' Set input file name inputFilePath = "my_sample_image.jpg" ' Set output file title outputFilePath = "my_sample_output.jpg" ' Add image to apply watermarks to waterMarker.AddInputFile(inputFilePath, outputFilePath) ' Create new watermark Dim preset As New SimpleVerticalText() ' Set watermark text preset.Text = "Bytescout Watermarking" ' Set watermark font preset.Font = New WatermarkFont("Tahoma", FontStyle.Regular, FontSizeType.Points, 20) ' Set watermark text color preset.TextColor = Color.Black ' Set text transparency preset.Transparency = 20 ' Set watermark placement preset.Placement = WatermarkPlacement.MiddleCenter ' Set text rotation preset.TextRotation = TextRotation.Counterclockwise ' Add watermark to watermarker waterMarker.AddWatermark(preset) ' Set output directory waterMarker.OutputOptions.OutputDirectory = "." ' Set output format waterMarker.OutputOptions.ImageFormat = OutputFormats.JPEG ' Apply watermarks waterMarker.Execute() ' open generated image file in default image viewer installed in Windows Process.Start(outputFilePath) End Sub End Module