Here is the code for the 128A Barcode... You use it the same way as the 3 of 9 code shown earlier.
Option Explicit
' Written by Rodney Marr (RodMarr@mailcity.com) October 7, 2000
' Modified to 128A by Mike Lightner 12 Apr 2004
'
' Barcode 128-A Generator
'
' Permission granted for public use...
MichaelRed,
By setting the Textbox control to "No" you will no longer see the data in the text box. This means you don't need to change the font and only the barcode will show when printed.
1 - Create Report with a TextBox control. (example named Barcode) Make sure the Visible property is set...
The font idea will work ok on most computers but I have had some problems with it. I found the following code works much better. Just creat a new module and past this in it. Then follow the instructions for adding the barcodes to your reports.
Option Compare Database 'Use database order...
Inky,
Thank you for asking this question. I have been having the same problem.
Roy,
When I used the above fix in my project it fixed the paramitor error but now I get a data type conversion error. Any ideas?
Here is the code I am using:
Dim qdf As DAO.QueryDef
Dim prm As DAO.Parameter
Dim...
I am trying to run a recordsed to get data from a qry with multiple criteria. When I open the report I get an error '3061' to few paramiters: expected 6
Any Ideas?
Report VB:
Set Cdb = CurrentDb
Set rsJobs = Cdb.OpenRecordset("Select Count([Kit_Type])as Jobs From qryQAFilterTA WHERE...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.