GS1- Data Matrix

using System;
using System.Collections.Generic;
using System.Drawing.Printing;
using System.Windows.Forms;
using DevExpress.XtraPrinting.BarCode;
using DevExpress.XtraReports.UI;
// ...
public XRBarCode CreateDataMatrixGS1BarCode(string BarCodeText) {
    // Create a bar code control.
    XRBarCode barCode = new XRBarCode();

    // Set the bar code's type to Data Matrix GS1.
    barCode.Symbology = new DataMatrixGS1Generator();

    // Adjust the bar code's main properties.
    barCode.AutoModule = true;
    barCode.Text = BarCodeText;
    barCode.ShowText = true;
    barCode.Width = 200;
    barCode.Height = 200;

    // Adjust the properties specific to the bar code type.
    // (Assigned below are the default values.)
    ((DataMatrixGS1Generator)barCode.Symbology).FNC1Substitute = "#";
    ((DataMatrixGS1Generator)barCode.Symbology).HumanReadableText = true;
    ((DataMatrixGS1Generator)barCode.Symbology).MatrixSize = DataMatrixSize.MatrixAuto;

    return barCode;
}

Imports System
Imports System.Collections.Generic
Imports System.Drawing.Printing
Imports System.Windows.Forms
Imports DevExpress.XtraPrinting.BarCode
Imports DevExpress.XtraReports.UI
' ...
Public Function CreateDataMatrixGS1BarCode(ByVal BarCodeText As String) As XRBarCode
    ' Create a bar code control.
    Dim barCode As New XRBarCode()

    ' Set the bar code's type to Data Matrix GS1.
    barCode.Symbology = New DataMatrixGS1Generator()

    ' Adjust the bar code's main properties.
    barCode.AutoModule = True
    barCode.Text = BarCodeText
    barCode.ShowText = True
    barCode.Width = 200
    barCode.Height = 200

    ' Adjust the properties specific to the bar code type.
    ' (Assigned below are the default values.)
    CType(barCode.Symbology, DataMatrixGS1Generator).FNC1Substitute = "#"
    CType(barCode.Symbology, DataMatrixGS1Generator).HumanReadableText = True
    CType(barCode.Symbology, DataMatrixGS1Generator).MatrixSize = DataMatrixSize.MatrixAuto

    Return barCode
End Function

using DevExpress.XtraPrinting.BarCode;
using DevExpress.XtraReports.UI;
//...

var barCode = CreateDataMatrixGS1BarCode("012345678");

var report = new XtraReport() {
    Bands = {
        new DetailBand() {
            Controls = { barCode }
        }
    }
};

Imports DevExpress.XtraPrinting.BarCode
Imports DevExpress.XtraReports.UI
'...

Private barCode = CreateDataMatrixGS1BarCode("012345678")

Private report = New XtraReport() With {
    .Bands = {
        New DetailBand() With {
            .Controls = { barCode }
        }
    }
}