ByteScout Watermarking SDK – VB.NET – Add Tiled Diagonal Text Watermark to Image

Home
/
Articles
/
ByteScout Watermarking SDK – VB.NET – Add Tiled Diagonal Text Watermark to Image

printable version:
ByteScout-Watermarking-SDK-VB-NET-Add-Tiled-Diagonal-Text-Watermark-to-Image.pdf

How to add tiled diagonal text watermark to image for tiled text diagonal in VB.NET using ByteScout Watermarking SDK

See how to add tiled diagonal text watermark to image to have tiled text diagonal in VB.NET

Source code documentation samples provide quick and easy way to add a required functionality into your application. ByteScout Watermarking SDK was made to help with tiled text diagonal 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.

Fast application programming interfaces of ByteScout Watermarking SDK for VB.NET plus the instruction and the code below will help to learn how to add tiled diagonal text watermark to image. Open your VB.NET project and simply copy & paste the code and then run your app! This basic programming language sample code for VB.NET will do the whole work for you in implementing tiled text diagonal in your app.

Our website provides free trial version of ByteScout Watermarking SDK that includes source code samples to help with your VB.NET project.

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.Drawing

Imports Bytescout.Watermarking

Module Module1

    Sub Main()
        ' Create Watermarker instance
        Dim waterMarker As New Watermarker()

        ' Initialize library
        waterMarker.InitLibrary("demo", "demo")

        ' Set input file name
        Dim inputFilePath As String = "my_sample_image.jpg"
        ' Set output file title
        Dim outputFilePath As String = "my_sample_output.jpg"

        ' Add image to apply watermarks to
        waterMarker.AddInputFile(inputFilePath, outputFilePath)

        ' Create new watermark
        Dim preset As New Presets.TiledTextDiagonal()

        ' Set text
        preset.Text = "Sample watermark text"

        ' Set font size
        preset.Font.Style = FontStyle.Bold
        preset.Font.Size = 3

        preset.Transparency = 15

        ' Add watermark to watermarker
        waterMarker.AddWatermark(preset)

        ' Set output directory
        waterMarker.OutputOptions.OutputDirectory = "."

        ' Apply watermarks
        waterMarker.Execute()

        ' open generated image file in default image viewer installed in Windows
        Process.Start(outputFilePath)

    End Sub

End Module