Question

VB中,设置帐票打印的长宽的代码怎么写？

点击打印按钮的时候，设置固定的宽度和高度

Answer 1

用VB可以直接使用对象 Printer 进行数据及图片的打印。
如：
'***初始化打印机
Printer.ScaleMode = 1
Printer.FontName = "仿宋_GB2312"
Printer.FontSize = 8
Printer.FontBold = False

'设置打印区域,四个 参数分别是打印区域的左上角及右下角坐标
' 这里以 A4 打印纸张大小为例，边框距各为2cm.

PrtLeftx=567*2
PrtLefty=567*2.0
PrtRightx=567*(21-2)
PrtLefty=567*(29.5-2)

'**打印线条
Printer.DrawWidth = 2
Printer.Line (PrtLeftx, PrtLefty)-(PrtRightx, PrtLefty)
Printer.DrawWidth = 1

' 打印字符串
Printer.Print "中国 China"

要打印窗体中TextBox 中的内容，将其赋给变量或直接打印都可以。