请教怎样进行硬字库打印
大家好：我是银行柜员，请教大家二个问题：①针式存折打印机的硬字库中是只有一种字体呢还是有好几种字体？
②怎样用VB来打印它的硬字库中的字。比如要打印"中国农业银行"，用VB代码怎么写？
谢谢指导!!! --------------------编程问答-------------------- windows下的打印，一般都抛弃打印机自带的字库，一般都是转换为图像之后输出，字体你加人Window的的字库里，然后选择字库即可
控制面板-字体里面加 --------------------编程问答-------------------- 楼上大侠，打印机硬字库是在打印机中的，它的字体怎样加入window的字库中，请教了o --------------------编程问答-------------------- 那就发送打印机命令，具体看打印机说明说明书啊 --------------------编程问答--------------------
Private Sub Command1_Click()
Dim i As Integer
Open "LPT1" For Output As #1
Print #1, Chr(27); Chr(64) '清除原先的打印设置，即初始化
Print #1, Chr(28) & "@" '设置汉字状态
pnt1
Print #1, Chr(28) & "J" '设置汉字纵向打印
pnt1
Print #1, Chr(28) & "K" '设置汉字横向打印状态
Print #1, Chr(27); "3"; Chr(45) '设置换行量宽度
Print #1, Chr(27); "W"; Chr(1) '设置四倍放大
Print #1, Chr(27); "q"; Chr(3) '设置空心字
pnt1
Print #1, Chr(27); Chr(64) '清除原先的打印设置，即初始化
For i = 3 To 24 Step 3 '执行字符间隔调整
Print #1, Chr(28); "S"; Chr(0); Chr(i)
pnt1
Next
Print #1, Chr(28); "S"; Chr(0); Chr(3)
Print #1, Chr(27); "4"; '设置斜体
Print #1, Chr(27); "q"; Chr(3) '设置空心字
pnt1
'Print #1, Chr(28) & "." '切换回西文状态
Close #1
End Sub
Private Sub Form_Load()
Text1 = ""
Open "LPT1" For Output As #1
Print #1, Chr(27); Chr(64) '清除原先的打印设置，即初始化
Close
End Sub
Public Sub pnt1()
Print #1, , "LPT1:" & "带有心脏的中英文打印机"
End Sub
补充：VB , 基础类
