public abstract class QRFrameOptions

Public MustInherit Class QRFrameOptions

using DevExpress.XtraPringing.BarCode;

public XRBarCode CreateQRCodeBarCode(string BarCodeText) {
    // Create a barcode control.
    XRBarCode barCode = new XRBarCode();

    // Set the barcode's type to QRCode.
    barCode.Symbology = new QRCodeGenerator();

    // ...

    // Set a rectangular frame and specifies its options.
    RectangleQRFrameOptions frameOpt = new RectangleQRFrameOptions() {
        FrameWidth = 2,
        FrameColor = System.Drawing.Color.DarkRed,                
        Text = "Scan me",
        TextAlignment = QRFrameTextAlignment.Baseline,
        TextPosition = QRFrameTextPosition.Top,
        CornerRadius = 5
    };
    ((QRCodeGenerator)barCode.Symbology).FrameOptions = frameOpt;

    return barCode;
}

Imports DevExpress.XtraPringing.BarCode

Public Function CreateQRCodeBarCode(ByVal BarCodeText As String) As XRBarCode
    ' Create a barcode control.
    Dim barCode As New XRBarCode()

    ' Set the barcode's type to QRCode.
    barCode.Symbology = New QRCodeGenerator()

    ' ...

    ' Set a rectangular frame and specifies its options.
    Dim frameOpt As New RectangleQRFrameOptions() With {
        .FrameWidth = 2,
        .FrameColor = System.Drawing.Color.DarkRed,
        .Text = "Scan me",
        .TextAlignment = QRFrameTextAlignment.Baseline,
        .TextPosition = QRFrameTextPosition.Top,
        .CornerRadius = 5
    }
    CType(barCode.Symbology, QRCodeGenerator).FrameOptions = frameOpt

    Return barCode
End Function