Someone who knows where I find material to produce barcode fonts from within VB (VB6)?

And I also would like to know if there is some place on the web where I could download free barcode fonts (preferably Code39)