ドットプリンタでバーコードの印刷
こんにちは。いつもお世話になっています。
現在、ドットプリンタにバーコードの印刷を試みていますが、
数値のままの表記になってしまい、うまくいきません。
他の方の質問・回答も検索し、いろいろ試したのですが
状況に変わりがなかったので改めて質問を書かせていただきました。
現在使用しているプリンタは、NECのMultiImpactです。
(VB6.0で作業しています。)
実際に現在組んでいるコードは下記のようなものです。
Public Sub AA()
~略~
Printer.FontName = "OCR-B 10cpi"
Printer.FontSize = 12
Call Prt_set(10, 200, strNo) '※1
Printer.Font.Charset = 0
Printer.Font = "Code39"
Call Prt_set(280, 240, "*123456*") '※2
Printer.Font.Charset = 128
Printer.FontName = "OCR-B 10cpi"
Call Prt_set(280, 500, strC) '※3
~略~
End Sub
'指定された位置に印字する
Public Sub Prt_set(i As Integer, j As Integer, Moji As String)
Printer.CurrentY = i
Printer.CurrentX = j
Printer.Print Moji
End Sub
実行すると、
※1と※3の文字は正常に出力されますが、※2はそのまま"*123456*"数値(文字列?)で印刷されてしまいます。
初心者のため、見苦しいコードになっているかもしれませんが、どなたかなにか教えていただけないでしょうか。
よろしくお願いします。
お礼
ありがとうございます。