VB中picturebox绘制实时曲线图时,当图线越界如何使图形整体左移,并继...
或用Bitblt将左边图形复制到右边,然后再接着重画
用VB的picturebox采用Line函数画实时曲线之后,曲线满屏之后,如何让它...
用picture1.cls清屏,再重新画。清屏之后,需要把当前坐标也从0开始。假如你的坐标系最大值为20,那么你的X值需要mod 20的。
VB中在PICTUREBOX中的画图问题
1.划线用GdipDrawLineI 不过gdi使用需要定义token等参数,还有用完要释放 2.你的要求较为复杂 这个需要多个透明的层嵌套(或者用gdi来绘制背景透明的图),否则不可能实现任何一个图形画了之后还可以选择并且拖动大小这个要求,而且这一步的话,每一个图在picturebox内需要定义可以如何拖动,是否可以向桌面...
VB的picturebox中如何同时设置两个坐标进行实时曲线的绘制
先绘制第1个坐标系的数轴以及刻度(你就理解是绘制),然后绘制第一条曲线;再绘制第2个坐标系的数轴以及刻度(你就理解是绘制),最后按照第2个轴绘制第2条曲线。绘制第2条曲线,其实是做相对于第1个坐标系作图像的平移而已!提醒:VB默认的y轴正方向是向下的!
在VB中如何更改picturebox中图片的尺寸,并保存更改后的图片?
VB6.0中可使用PaintPicture 方法在 Form, PictureBox 或 Printer 上绘制图形文件时设置参数更改图片的尺寸。使用SavePicture 语句,从对象或控件(如果有一个与其相关)的 Picture 或 Image 属性中将图形保存到文件中。PaintPicture 方法,用以在 Form, PictureBox 或 Printer 上绘制图形文件(.bmp、.wmf...
如何在vb中的picturebox 里画图?
画左上角。Picture1.Line -(CX * f2, CY) ' 画右上角。Picture1.Line -(CX, CY * f2) ' 画右下角。Picture1.Line -(CX * f1, CY) ' 画左下角 ForeColor = QBColor(I Mod 15) ' 每次改变颜色。Next I SavePicture Picture1.Image, "z:\\test.bmp"End Sub ...
vb 怎样使image或picturebox移动时不覆盖form上画的图形
你的意思是Image或PictureBox移动时会擦掉Form上画的图形吗?把Form的AutoRedaw属性设为True即可;如果是想让Image或PictureBox在图形的下面移动,这是不可能的,在一个窗体中,窗体本身肯定是最底层的,其他控件即使再贱也不可能比窗体还低下了。
vb中如何画曲线图?
一般的实时曲线显示的时候在屏幕的正中间有一条基准线,这里也要画出这条基准线,用一个过程PicMidleLine()来实现,代码如下:Private Sub PicMidleLine( picX As PictureBox)picX.Line (0, 0)-(picX.ScaleWidth, 0), vbGreen '画出中线 End Sub 要画一条实时曲线,坐标轴的设定很重要,在...
如何把实时数据在VB中用曲线图显示
VB可通过Timer控件的Timer事件中使用Line方法或PSet 方法绘制线条、色彩实现实时显示采集数据的曲线。 Line方法,在对象上画直线和矩形。 PSet 方法,将对象上的点设置为指定颜色。 以下是一段工控程序的使用Line方法的代码: Option Explicit Dim quitflag As Boolean Dim cmdXianshiFlag As Boolean Dim cmdTestFlag As...
VB中如何让PictureBox中画出的图形缩放居中
以vb6缩放居中为例,调整PaintPicture的参数X1,Y1,X2,Y2,代码如下:Private Sub Command1_Click()Picture1.Circle (500, 500), 400, vbGreen Picture1.Line (100, 100)-(1000, 1000), vbRed Picture1.Line (100, 1000)-(1000, 100), vbBlue End Sub Private Sub Command2_Click()Dim ...