彩票走势图

utf - 8是一个可变长度的Unicode字符编码。它可以代表任何标准的Unicode字符。您可以生成非英文字符条形码，比如阿拉伯语、拉丁语、希腊语等。下面就给出使用Aspose.BarCode的示例代码：

[C#]

Bitmap imgBarcode = null;
// set license
Aspose.BarCode.License license = new Aspose.BarCode.License();
license.SetLicense("c:\\Aspose.Total.lic");
try
{
    // generate the barcode
    BarCodeBuilder objBarCodeBuilder = new BarCodeBuilder();
    objBarCodeBuilder.SymbologyType = Aspose.BarCode.Symbology.MacroPdf417;
    // set the codetext by converting it into unicode byte array
    byte[] byteArray = Encoding.Unicode.GetBytes("منحة");
    objBarCodeBuilder.SetCodeText(byteArray);
    imgBarcode = objBarCodeBuilder.GenerateBarCodeImage();
    imgBarcode.Save("c:\\barcodes.png");
    // recognize the above barcode
    BarCodeReader reader = new BarCodeReader("c:\\barcodes.png");
    while(reader.Read())
    {
        Encoding unicode = Encoding.Unicode;
        // get the characters array from the bytes
        char[] unicodeChars = new char[unicode.GetCharCount(reader. GetCodeBytes(), 0, reader. GetCodeBytes().Length)];
        unicode.GetChars(reader. GetCodeBytes(), 0, reader. GetCodeBytes().Length, unicodeChars, 0);
        // build unicode string
        string strCodeText = new string(unicodeChars);
        System.Console.WriteLine(strCodeText);
    }
    reader.Close();
}
catch (Exception ex)
{
    System.Console.WriteLine("No BarCode found");
}

[VB.NET]

Dim imgBarcode As Bitmap = Nothing
' set license
Dim license As Aspose.BarCode.License = New Aspose.BarCode.License()
license.SetLicense("c:\Aspose.Total.lic")
Try
	' generate the barcode
	Dim objBarCodeBuilder As BarCodeBuilder = New BarCodeBuilder()
	objBarCodeBuilder.SymbologyType = Aspose.BarCode.Symbology.MacroPdf417
	' set the codetext by converting it into unicode byte array
	Dim byteArray As Byte() = Encoding.Unicode.GetBytes("منحة")
	objBarCodeBuilder.SetCodeText(byteArray)
	imgBarcode = objBarCodeBuilder.GenerateBarCodeImage()
	imgBarcode.Save("c:\barcodes.png")
	' recognize the above barcode
	Dim reader As BarCodeReader = New BarCodeReader("c:\barcodes.png")
	Do While reader.Read()
		Dim [unicode] As Encoding = Encoding.Unicode
		' get the characters array from the bytes
		Dim unicodeChars As Char() = New Char([unicode].GetCharCount(reader. GetCodeBytes(), 0, reader. GetCodeBytes().Length) - 1){}
		[unicode].GetChars(reader. GetCodeBytes (), 0, reader. GetCodeBytes ().Length, unicodeChars, 0)
		' build unicode string
		Dim strCodeText As String = New String(unicodeChars)
		System.Console.WriteLine(strCodeText)
	Loop
       reader.Close()
Catch ex As Exception
	System.Console.WriteLine("No BarCode found")
End Try