ByteScout BarCode Generator SDK – VB.NET – QR Code With CalenderEntry

Home
/
Articles
/
ByteScout BarCode Generator SDK – VB.NET – QR Code With CalenderEntry

printable version:
ByteScout-Barcode-SDK-VB-NET-QR-Code-With-CalenderEntry.pdf

QR code with calenderentry in VB.NET with ByteScout Barcode SDK

Write code in VB.NET to make QR code with calenderentry with this How-To tutorial

The documentation is designed to help you to implement the features on your side. ByteScout Barcode SDK was made to help with QR code with calenderentry in VB.NET. ByteScout Barcode SDK is the fully featured library to generate barcodes. Supports QR Code, Code 39, Code 128, UPC, GS1, GS-128, PDF417, Datamatrix and many other barcode types. Includes various options for barcode generation to ensure output quality, add barcodes to new or existing pdf files and images.

VB.NET code snippet like this for ByteScout Barcode SDK works best when you need to quickly implement QR code with calenderentry in your VB.NET application. 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. This basic programming language sample code for VB.NET will do the whole work for you in implementing QR code with calenderentry in your app.

Visit our website provides for free trial version of ByteScout Barcode SDK. Free trial includes lots of source code samples to help you 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)

Program.vb

      Imports Bytescout.BarCode

Module Program

    Sub Main()

        Try
            ' Create new barcode
            Dim barcode As Barcode = New Barcode

            ' Set symbology
            barcode.Symbology = SymbologyType.QRCode

            ' Get QRCode value in CalenderEntry format
            barcode.Value = GetCalenderEntryFormatText()

            ' Save barcode to image
            barcode.SaveImage("result.png")

            ' Show image in default image viewer
            Process.Start("result.png")

        Catch ex As Exception
            Console.WriteLine("Error: " + ex.Message)

            Console.WriteLine("Press enter key to exit...")
            Console.ReadLine()
        End Try

    End Sub

    ''' <summary>
    ''' Return Calender Entry Format
    ''' </summary>
    ''' <returns></returns>
    Private Function GetCalenderEntryFormatText() As String
        Return "BEGIN:VCALENDAR
BEGIN:VEVENT
DTSTART:20181113T100000Z
DTEND:20181113T150000Z
SUMMARY:New Calendar Entry
DESCRIPTION:Description Text
LOCATION:Chicago
RRULE:FREQ=YEARLY;BYDAY=-1SU;BYMONTH=3
END:VEVENT
END:VCALENDAR"
    End Function

End Module