OLE Active Barcode Control

[TrekBiker]

A form in a database I've been asked to update contains a pick list containing a barcode for the particular order

The barcode data properties in the form say
Control Class : Order ID
OLE Class ; Active Barcode Control
Class : abcd17.Control

Right-clicking the barcode shows a list including Active Barcode Control Object with a Properties link that opens up a form that allows definition of the barcode properties like dimensions and Code type.

There's a General module in the database containing this

Function barcode()

    Dim rpt As Report
    Dim strBarcode As String
    Set rpt = Reports![Pick List]
    strBarcode = "SO" & Format(rpt!OrderID, "<<<<<&")
    rpt.ScaleMode = 1

End Function

In use this all produces a barcode for the Order ID prefaced by SO.

This is far as I can go in trying to identify how this all works, including how the control would have been inserted and how it operates. Any steers would be much appreciated.

 

[strongm]

https://www.activebarcode.com/ocx/