锐客网

  1. 首页 > 睿知 > it技术 > >

包含vb.net曲线显示不完的词条

IT技术数据

vb.net连续绘制曲线图不消失您好，您是想问vb.net连续绘制曲线图不消失怎么办？b.net连续绘制曲线图不消失的解决办法如下：
1、首先必须创建bitmap,关联到picturebox1.image上 。
2、再在picturebox1.image上创建Graphics,再进行作图 。即可显示线图 。
VB.net中窗体上控件太多，运行时在桌面上显示不全，怎样用滚动条来解决？请详细说明，最好给个小例子 。思路：
利用几个可以作为容器的控件，添加滚动条就可以了：
我举个例子：（这个问题我记得回答过的?。?
添加1个PicTureBox1，作为容器
在PicTureBox1里添加PicTureBox2 ， 在窗体上添加一个垂直滚动条 。
把你所谓的许多控件放到PicTureBox2里，滚动条改变的是PicTureBox2在PicTureBox1里的Top属性，我想你通过一定的空间想象力，可以想到效果了吧？
注意：默认状态设置PicTureBox2的Top属性为0，当该属性为负值的时候，PicTureBox2显示的效果是向上移动，即下面原来隐藏的内容为可见了 。
要设置PicTureBox2的AutoRedraw 属性为True 。
若要左右移动效果，那么改变其 Left 属性，原理不再赘述了 。
VB中picturebox绘制实时曲线图，当数据显示不下时如何实现压缩，使曲线越来越密，初学者把仅有的分全赏了简单举个例子 ， 不知道能否对你有用 。。。（说明下而已，不能运行）
此例为一个小模块，原创哦~~非抄袭！
Private Sub 量程自动识别(ByVal 传递过来的数据 As Single)
Dim 量程 As Long
If 数据 = Picture高度 Then
Exit Sub
End If
量程 = CLng(传递过来的数据 / 100 + 0.5) * 100'获取新的高度
Picture1.ScaleHeight = 量程'ScaleHeight属性为picture1的内部高度
Picture1.Cls'清空picture控件
【包含vb.net曲线显示不完的词条】Picture1.AutoRedraw = True'设置自动重绘有效
Picture1.DrawWidth = 1'设置绘制线条宽度
End sub
哦，对了，之前采集的数据要记得保存起来（例如保存在数组中），之后要记得把以前所有的数据点都绘制上去哦 。
判断最后一组数据在X轴上的位置，以此点的坐标为 picture1的 ScaleWidth，上例只是高度的换成宽度不就好了呀 。
还有你把之前的数据都存起来，每次清空picture时 重绘就OK了噢
VB.NET 实时曲线拖一个PictureBox1控件 创建一个Paint事件 。在事件中加入Private Sub PictureBox1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles PictureBox1.Paint' Create pens.Dim redPen As New Pen(Color.Red, 3)Dim greenPen As New Pen(Color.Green, 3)' Create points that define curve.Dim point1 As New Point(50, 50)Dim point2 As New Point(100, 25)Dim point3 As New Point(200, 5)Dim point4 As New Point(250, 50)Dim point5 As New Point(300, 100)Dim point6 As New Point(350, 200)Dim point7 As New Point(250, 250)Dim curvePoints As Point() = {point1, point2, point3, point4, _point5, point6, point7}' Draw lines between original points to screen.e.Graphics.DrawLines(redPen, curvePoints)' Draw curve to screen.e.Graphics.DrawCurve(greenPen, curvePoints)End Sub得到数据后，改point的数据 。然后PictureBox1.Refresh()就行了
vb中样条曲线问题不引用的话 ， VB做不到 。这事情要看VB的版本 。如果是6.0的话，要去网上下载GDIPLUS的库文件或者自己声明GDI+的API 。如果是VB.NET的话，VB自带GDI+，但是也可以下载GDIPLUS库来用 。如果不知道去哪里下载，我下载有，你可以问我要 。我使用VB6.0 。下载gdiplus以后，在VB里面引用这个库，注意要选择“所有文件”才能看到这个库 。gdi+里面的path功能可以实现样条：Private TOKEN As Long'GDI+对象
Private Graphics As Long'画板
Private Sub InitGDIPlus()

推荐阅读


上一篇：androidhtml5小游戏，android简单小游戏程序

下一篇：怎么修改ip路由器密码，如何修改路由ip