用vb能不能实现定位打印，窗口有2个标签和1个编辑框，能不能把标签和编辑框内容打印在打印纸的格子上
怎么能实现这种功能？

VB6 的 定位打印，就相当于 在一个 PictureBOX 上作图。
在 PictureBOX 如何定位，如何显示，那么就照样操作打印机。
绘制完成后，发送打印就可以了。
注意，坐标不要超过设定的纸张大小，否则会导致换页。

有没有打印代码学习一下？

一个笨方法，但非常实用。
单独作一个打印窗体（假定窗体名称为Form2），设置：

Me.BorderStyle = 0
Me.BackColor = &HFFFFFF
Me.Height = 13000    '打印纸高度，以缇为单位，不能以像素为单位，以A4为例
me.Width = 11900     '打印纸宽度，以缇为单位，不能以像素为单位，以A4为例
'在Form2的适当位置放置你需要的标签和编辑框（应该是文本框吧）
'在需要打印的窗体（假如窗体名称为Form1）放置一个按钮，在按钮单击事件中
On Error Resume Next                          '如果发生错误退出此过程
Form2.Show                                    '加载打印窗体 Form2，注意不能关闭Form1窗体！
'在Form2窗体的Form_Load中编写代码：
Label1.Caption = Form1.Label1.Caption         'Form1中的Label1.Caption数据传递给Form2的Label1.Caption
Label2.Caption = Form1.Label2.Caption         'Form1中的Label2.Caption数据传递给Form2的Label2.Caption
Text1.Text = Form1.Text1.Text                 'Form1中的Text1.Text数据传递给Form2的Text1.Text
Me.PrintForm                                  '开始打印
Unload Me                                     '关闭打印窗体Form2

打印窗体加载到关闭非常快，几乎看不出来打印窗体Form2的界面。只要你打印窗体设计合适，打印出来的效果还是很不错的。

标签和文本框打印的位置不在指定的位置，怎么调整？

使用 move 方法 移动啊！
或者使用 left ,top 属性进行移动

form2.Label1.Caption.move 100,200

form2.Label1.Caption.left=200
form2.Label1.Caption.top=100

这都是基础的东西啊！
包括在 PictureBOX 上定位显示文字，画线、点、圆，都是基本的操作。

谢谢！！！

[此贴子已经被作者于2018-4-16 20:38编辑过]

想学vb有没有入门的书介绍一下？

打印方向是纵向改成横向，代码怎么写
按照这个方法打印的字体不是很清楚，还有标签后面的点（应该是窗体上的点）和文本框的半个框子打印出来了

[此贴子已经被作者于2018-4-17 13:46编辑过]

请问你这种方法打印清楚吗？