This sample VB project contains a procedure named DrawBarcode which will create a Code 39 barcode on the specified picture control.
To use: Call DrawBarcode(BarcodeString$, PictureControl)
Example: Call DrawBarcode(Text1, Picture1)
The Drawbarcode procedure will also place a copy of the barcode in the clipboard so that it can easily be pasted into other applications such as Word or Excel.