Font Encoder & Check Digit Calculator
(Visual Basic and Visual FoxPro Source Code Included)
IDAutomation's Font Encoder & Check Digit Calculator with Visual
Basic source code works with IDAutomation's
barcode fonts to create
a string that, when combined with IDAutomation's barcode fonts, will
create a correct barcode. The string used to create the barcode may
also be copied to the clipboard, making it easy to paste bar codes into
other Windows applications.
The following links will assist with implementation:
NOTE: The Font Encoder & Check Digit Calculator is not to be used
with IDAutomation's
Universal Barcode
Fonts; use the encoder provided with that application.
Additional Font Tools:
Microsoft Office
Macros |
Windows
Font DLLs |
Crystal Reports
UFL |
PDF417 Encoder
The compiled application is ready to install and is designed to calculate
check characters for the
barcode fonts
available from IDAutomation. This application is distributed as shareware
and is compatible with Windows 95 and greater including Windows 98,
NT 3.51, NT 4.0, Windows 2000 and Windows XP. The Visual Basic (VB)
6.0 and Visual FoxPro (VFP) source code for the application allows developers
to print barcodes directly from their applications without the use of
DLL or OCX files. Programmers that are coding in another programming
language can also use the source code as a guide.
Barcode Check Digit Calculator & Printing Application
Tutorial:
After the application is installed, it can be accessed by an icon placed
in Start - Programs. In this example, IDAutomation creates a
barcode encoding the data "Code 128 Test" in a Microsoft Word document.
NOTE: Code 128
fonts MUST be used for version 2.0 and above for the Code 128 and
UCC128 functions.
- After the application starts up, enter "Code 128 Test" in the
"data to encode in barcode" field. Example, choose the "Copy to
Clipboard" option and press the "Code 128 Set B" button.

- In the MS Word application, place the cursor on the area for
the barcode and choose the IDAutomationC128M font.
NOTE: When selecting the font from the pull down menu, please
do not use the fonts that begin with the
"@" Symbol.
Instead, scroll down in the list and select the ones that begin
with "IDAutomation".

- Choose Edit - Paste to place the barcode into the application.

This application can be used to print barcodes on other operating
systems such as Macintosh. As an example, to place a UPC-A barcode in
a Macintosh document: Start the Barcode Check Digit Calculator & Printing
Application on a Windows PC. Enter the UPC-A number to encode in a barcode
(in this case let's say it is "20348934382"). Then choose the UPC-A
button. The "string to print the barcode" will display the characters
to be typed on the Macintosh to create the barcode, in this case it
displays "W(c03489*NONSMm(W". On the Macintosh application, select the
font "IDAutomationUPCEANL" and then type the characters of the string
into the document.
It is IDAutomation's intention to write IDAutomation's Visual Basic
source code using as few functions as possible to allow for easy conversion
to other programming languages. If a source code is created in another
language and is designed to be shared with others, please
contact IDAutomation.
In some cases, discounts can be provided for IDAutomation products if
a working source code is provided that would be beneficial to others.
All of the barcode functions reside in the IDAutomationVBA.bas
module of the
Visual Basic application. The following table is a list of common
Visual Basic functions used in IDAutomation's source code and what the
codes do:
|
VB Function |
What it does |
| Asc(character) |
Converts a character to the ASCII
value |
| Chr(n) |
Returns the character
represented by the number n in ASCII |
| Len(string) |
Returns the length of a string |
| Mid(string,
x, n) |
Returns n number
characters from a string starting from location
x |
| (number Mod n) |
Returns the remainder after number
is divided by n |
| Right$(string,
n) |
Returns n characters
starting from the right of the string |
| RTrim(LTrim(string)) |
Removes spaces before and after a string |

© Copyright 2010 IDAutomation.com, Inc., All Rights Reserved.
Legal Notices. |
|
|
|
|