ByteScout QR Code SDK - VB.NET - Convert vCard to QR Code Barcode - ByteScout

ByteScout QR Code SDK – VB.NET – Convert vCard to QR Code Barcode

  • Home
  • /
  • Articles
  • /
  • ByteScout QR Code SDK – VB.NET – Convert vCard to QR Code Barcode

How to convert vcard to QR code barcode in VB.NET with ByteScout QR Code

How to code in VB.NET to convert vcard to QR code barcode with this step-by-step tutorial

These sample source codes on this page below are demonstrating how to convert vcard to QR code barcode in VB.NET. ByteScout QR Code is QR Code generation library. It provides full control on the quality, features and encoding. Can embed logo image right into QR Code itself. Batch barcode generation, and many special features like vCard or URL encoding are also supported. It can convert vcard to QR code barcode in VB.NET.

You will save a lot of time on writing and testing code as you may just take the VB.NET code from ByteScout QR Code for convert vcard to QR code barcode below and use it in your application. In your VB.NET project or application you may simply copy & paste the code and then run your app! Enjoy writing a code with ready-to-use sample VB.NET codes.

Free trial version of ByteScout QR Code is available for download from our website. Get it to try other source code samples for VB.NET.

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.Imaging Imports System.IO Imports Bytescout.BarCode Imports Thought.vCards Module Module1 Sub Main() ' Generate vCard Dim vCard = new vCard() vCard.GivenName = "Forrest" vCard.FamilyName = "Gump" vCard.Organization = "Bubba Gump Shrimp Co." vCard.Title = "Shrimp Man" vCard.Phones.Add(new vCardPhone("(111) 555-1212", vCardPhoneTypes.Home)) vCard.EmailAddresses.Add(new vCardEmailAddress("forrestgump@example.com", vCardEmailAddressType.Internet)) Dim address = new vCardDeliveryAddress() address.AddressType.Add(vCardDeliveryAddressTypes.Home) address.Street = "100 Waters Edge" address.City = "Baytown" address.Region = "LA" address.PostalCode = "30314" address.Country = "United States of America" vCard.DeliveryAddresses.Add(address) ' Save vCard data to string Dim writer = new vCardStandardWriter() Dim stringWriter = new StringWriter() writer.Write(vCard, stringWriter) ' Create and activate QRCode instance Using barcode As New QRCode("demo", "demo") ' Set value barcode.Value = "ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz 1234567890" ' Set barcode value barcode.Value = stringWriter.ToString() ' Save barcode image to file barcode.SaveImage("result.png") End Using ' Open the image in default image viewer (for demo purpose) Process.Start("result.png") End Sub End Module

ON-PREMISE OFFLINE SDK

60 Day Free Trial or Visit ByteScout QR Code Home Page

Explore ByteScout QR Code Documentation

Explore Samples

Sign Up for ByteScout QR Code Online Training

ON-DEMAND REST WEB API

Get Your API Key

Explore Web API Docs

Explore Web API Samples

packages.config
      
<?xml version="1.0" encoding="utf-8"?> <packages> <package id="Thought.vCards" version="1.0.9" targetFramework="net40" /> </packages>

ON-PREMISE OFFLINE SDK

60 Day Free Trial or Visit ByteScout QR Code Home Page

Explore ByteScout QR Code Documentation

Explore Samples

Sign Up for ByteScout QR Code Online Training

ON-DEMAND REST WEB API

Get Your API Key

Explore Web API Docs

Explore Web API Samples

VIDEO

ON-PREMISE OFFLINE SDK

60 Day Free Trial or Visit ByteScout QR Code Home Page

Explore ByteScout QR Code Documentation

Explore Samples

Sign Up for ByteScout QR Code Online Training

ON-DEMAND REST WEB API

Get Your API Key

Explore Web API Docs

Explore Web API Samples

Tutorials:

prev
next