vb 打印Picturebox里的控件 - VB / 控件
我在Picturebox上放了Label、Line、Checkbox由于数量太多Picturebox的高度已经达到16470，也就是说是A4大小，现在问题是打印的时候却打印屏幕显示部分，因为屏幕（1024*768）受限制无法完成全部打印，我试了好几种方法好是不知道该怎么处理，我看过资料说可以通过坐标来打印，但我不太懂这些！想请教个位怎么才能将其打印完成！最后是有代码因为我对VB代码不是很熟悉，或发个例子给我jisklsw@163.com!满意的我再加100-200分 谢谢！】
Picture2.Height = Picture1.Height
Picture2.AutoRedraw = True
BitBlt Picture2.hDC, 0, 0, Picture1.Width / Screen.TwipsPerPixelX, Picture1.Height / Screen.TwipsPerPixelX, Picture1.hDC, 0, 0, vbSrcCopy
Picture2.AutoRedraw = False
Picture2.Refresh
Printer.PaintPicture Picture2.Image, 0, 0
'Printer.Zoom = 20
Printer.EndDoc
上面代码只能打到屏幕显示部分超出的就打印不出来了
我试过分开打印但却变成了打印了两个页面！
不要拘泥于picturebox
必要的时候专门为打印设计布局，再怎么说，在一定的纸张上不可能容纳过多的东西。
不要拘泥于picturebox
必要的时候专门为打印设计布局，再怎么说，在一定的纸张上不可能容纳过多的东西。
相关问答：
Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' 打开刚创建的文件。
ReDim MyString(LOF(1) - 1)
Put #1, , MyRecord ' 读入所有字符到变量中 ......
dim a as string,b as string，c as string
a="工程编号,单位工程名称,分部工程编号"
b="单位工程名称"
c="单位"
怎么才能判断出a字符串中存在b字符串，而不存在c字符串
看看i ......
我的要求是：通过抓取别的程序上的表格的句柄，然后读取这个表格的内容。
表格句柄（类名：MSFlexGridWndClass）我已抓到，接下来如何读取表格的内容就不会了？求助。
能把代码发来学习下不？
244326867@qq.com ......
用VB编程读取短信,得到一大堆unicode编码,请教如何转换成文本
例如:读取短信后(华为900C或TC35i),串口得到如下数据:
+CMGL: 17,"REC UNREAD","8615007557713",,"10/03/30,09:37:15+32&qu ......
小弟用VB调EXCEL作图
objExlApp.Workbooks.Add
objExlApp.Charts.Add
objExlApp.ActiveChart.ChartType = xlLine
objExlApp.ActiveChart.HasLegend = True
objExlApp. ......
