Code 39 (USD-3)

• Mar 20, 2023
• 2 minutes to read

Code 39 is a variable length discrete barcode symbology. It can encode uppercase letters (A through Z), numeric digits (0 through 9), and a number of special characters.

Refer to the following article for more information: Code 39.

Add the Bar Code to a Report

1. Drag the XRBarCode item from the DX.24.2: Report Controls tab and drop it onto the report.

   

2. Set the XRBarCode control’s Symbology property to Code 39 (an object of the Code39Generator type).

   

3. Specify common barcode properties and properties specific to Code 39.

Specific Properties

• BarCodeGeneratorBase.CalcCheckSum

  Gets or sets whether to calculate a checksum for the bar code.

• Code39Generator.WideNarrowRatio

  Gets or sets the density of a bar code’s bars.

Runtime Example

The following code creates the Code 39 (USD-3) barcode and specifies its properties.

View Example: How to add a bar code to a report

Form1.cs

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

    // Set the barcode's type to Code 39.
    barCode.Symbology = new Code39Generator();

    // Adjust the barcode's main properties.
    barCode.Text = BarCodeText;
    barCode.Width = 400;
    barCode.Height = 100;

    // Adjust the properties specific to the barcode type.
    ((Code39Generator)barCode.Symbology).CalcCheckSum = false;
    ((Code39Generator)barCode.Symbology).WideNarrowRatio = 2.5F;

    return barCode;
}

Form1.vb

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

    ' Set the barcode's type to Code 39.
    barCode.Symbology = New Code39Generator()

    ' Adjust the barcode's main properties.
    barCode.Text = BarCodeText
    barCode.Width = 400
    barCode.Height = 100

    ' Adjust the properties specific to the barcode type.
    CType(barCode.Symbology, Code39Generator).CalcCheckSum = False
    CType(barCode.Symbology, Code39Generator).WideNarrowRatio = 2.5F

    Return barCode
End Function

The code example below shows how to create a report with the Code 39 barcode:

C#

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

var barCode = CreateCode39BarCode("012345678");

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

VB.NET

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

Private barCode = CreateCode39BarCode("012345678")

Dim report As New XtraReport()
Dim band = New DetailBand()
band.Controls.Add(barCode)