如何在vb中用什么命令或.......用打印机打印变量的内容 你可以在报表中放置若干个Formula,然后在运行时用:.Formulas(1) = """" & varname & """"进行赋值。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 用Printer对象,给你个例子,其他的你可以查联机帮助Private Sub PrintVar() Printer.Scalemode=vbMillimeters 对不起,前面的答复没写完,误按了发送按钮,下面继续Private Sub PrintVar() Printer.PaperSize = vbPRPSA4 '设置打印纸张大小 Printer.ScaleMode = vbMillimeters '设置位置定位单位(毫米) Printer.FontName = "宋体" '设置字体 Printer.FontSize = 16 '设置字体大小 Printer.FontBold = False '字体不加粗 Printer.FontItalic = False '不是斜体 Printer.CurrentX=20 '左右位置(20mm)相对于(0,0) Printer.CurrentY=30 '上下位置(30mm)相对于(0,0) Printer.Print 变量名字 '向打印机对象发送打印变量内容的命令 Printer.EndDoc '结束打印End Sub注:如果有多个变量要打印,就不断重复.CurrentX .CurrentY .Print三条代码,如果有多页,在页间用Printer.NewPage方法换页。Print不是Printer对象的方法,而是一条VB命令,语法格式同老式的BASIC语言里的Print命令完全相同。如果你接了多个打印机,还能用Printers集合,而且这个对象不用定义,那来就可以用,就象Screen对象一样。反正我觉得它还是很好用的,我自己开发的MIS系统里就经常用到它。 vb调用vc编写的DLL,问题! 急!!!VB中如何通过程序得到域中用户列表,以及用户的信息? 报表打印边框线条不够清楚,请问怎么办啊? 请问:如何设置media控件的可视化效果? 关于追加记录 很小的小问题~~~~~~~~~~~ vb条码打印 谁知道VB6.0中的,以e为底的对数如何计算? ADO的问题!在线等待!!! ★★★★还是datagrid控件显示数据的问题,能用的招都用了,没辄了请高人帮忙.... 列表框中的图标? 如何根据输入的内容得到需要的报告?
Private Sub PrintVar()
Printer.Scalemode=vbMillimeters
Private Sub PrintVar()
Printer.PaperSize = vbPRPSA4 '设置打印纸张大小
Printer.ScaleMode = vbMillimeters '设置位置定位单位(毫米)
Printer.FontName = "宋体" '设置字体
Printer.FontSize = 16 '设置字体大小
Printer.FontBold = False '字体不加粗
Printer.FontItalic = False '不是斜体
Printer.CurrentX=20 '左右位置(20mm)相对于(0,0)
Printer.CurrentY=30 '上下位置(30mm)相对于(0,0)
Printer.Print 变量名字 '向打印机对象发送打印变量内容的命令
Printer.EndDoc '结束打印
End Sub注:如果有多个变量要打印,就不断重复.CurrentX .CurrentY .Print三条代码,如果有多页,在页间用Printer.NewPage方法换页。Print不是Printer对象的方法,而是一条VB命令,语法格式同老式的BASIC语言里的Print命令完全相同。如果你接了多个打印机,还能用Printers集合,而且这个对象不用定义,那来就可以用,就象Screen对象一样。反正我觉得它还是很好用的,我自己开发的MIS系统里就经常用到它。