vb中要打印窗体 窗体中包括图片框 运行后formlaod 中执行图片框画坐标轴等操作 打印好象显示不出坐标轴

来源:百度知道 编辑:UC知道 时间:2024/05/22 11:49:33
就是要打印整个窗体 可是窗体太大 自己调节下打印设置发现可以全部打印窗体 可是窗体中有两个图片框 图片框中画坐标轴 厘米毫米 而且每隔两厘米标住下 自己没安装打印机 但是设置打印后没显示坐标轴和标住啊 为什么啊 是因为formload 里面调用picture.line 所以打印不显示还是怎么回事??
忘记说了 窗体和 图片框的autoredraw 都设为true了 但是自己尝试了
举个例子啊
在form1_load()
中添加代码
picture1.currentX=100
picture1.currentY=200
picture1.line (0,0)-(100,500)
在窗体中添加一个command控件
控件里调用 me.printform 就是打印窗体的功能
但是为什么图片框里面的画的直线打印不出来呢 ??
如果在图片框里面直接画直线而不是在form_load 事件里面用line 语句画直线就能打印出 怎么回事啊 ?

打印的命令是什么啊?

要设置窗体和picture控件的AutoRedraw属性为true

Private Sub Command1_Click()

Me.PaintPicture Picture1.Image, Picture1.Left, Picture1.Top '在窗体上画图像
Picture1.Visible = False '隐藏控件
PrintForm '打印
Picture1.Visible = True '重新显示

End Sub