请问:如何对我这种无IMAGE和PICTURE的"PICTURE1"图形进行截取放大?
图形截取的问题.
有一个Picuture1控件,此控件未加截图形,而是直接使用LINE等语句直接在此图上绘图生面图形.(此图上画图的各点位数值存在几个数组里.).
图画好后我要对所画的图进行部份截取放大查看,使用下面的语句:
Picture9.PaintPicture Picture1.Image, 0, 0, Picture9.Width, Picture9.Height, chaxunx0, chaxuny0, chaxunx1 - chaxunx0, chaxuny1 - chaxuny0
此名出错,提示无效的过程调用或参数,我改为Picture1.picture后提示错误编号481 无效图片.
请问:如何对我这种无IMAGE和PICTURE的"PICTURE1"图形进行截取放大?
我这是对图形操作刚入门不久采取的垃圾放大图形的作法.
我想了解如何对此图放大查询,即---不是查看放大已经画好线条的粗细,而是想放大比例绘制所选择的查看区域的数据.请高手指教要怎样对数据图形进行放大查询.
[解决办法]
试一试这个:
Option ExplicitPrivate Sub Command1_Click() '手动设置Picture1.AutoRedraw=True Picture1.Line (10, 10)-(100, 100), vbRed Picture1.Refresh Picture2.PaintPicture Picture1.Image, 0, 0, Picture2.Width, Picture2.Height, 0, 0, 100, 100End Sub