VB.NET

Append Encoded Binary Data to StringBuilder

Demonstrates how to append encoded binary data to the contenets of a StringBuilder. VB.NET

Dim success As Boolean = False

Dim bd As New Chilkat.BinData

success = bd.LoadFile("qa_data/jpg/starfish.jpg")
If (success = False) Then
    Debug.WriteLine("Failed to load file.")
    Exit Sub
End If


' For example, let's say we want construct simple JSON containing the base64 representation of the above JPG file.
Dim sb As New Chilkat.StringBuilder
sb.Append("{ ""jpg"": """)
' GetEncodedSb appends the enocded representation of the binary data to the StringBuiler passed in the 2nd arg.
bd.GetEncodedSb("base64",sb)
sb.Append(""" }")

Debug.WriteLine(sb.GetAsString())

' Output looks like this:
'  { "jpg": "/9j/4AAQSkZJRgABAg...rcQ+vo//2Q==" }