VB控件PictureBox画实时曲线不显示
采集的数据
If kkk(0) = 2 Then
Label2.Caption = inbuf(0)
If Val(Label9.Caption) = &H1 Then
kk = inbuf(0) * 100 / 153
Text1.Text = kk
datate(cishu) = kk
Grid.Col = 1: Grid.Row = cishu + 1
Grid.Text = kk
cishu = cishu + 1
绘图程序
Private Sub draw()
Picture1.Cls
Picture1.DrawWidth = 1
Picture1.BackColor = QBColor(15)
Picture1.Scale (0, 200)-(200, 0)
For c = 1 To cishu - 1
X1 = (c - 1): Y1 = datate(c - 1)
X2 = c: Y2 = datate(c)
Picture1.Line (X1, Y1)-(X2, Y2), QBColor(0)
Next c
End Sub
帮忙看下哪里错了怎么改才能显示
2、Picture1的AutoRedaw属性必须设为True
暂时只能说这两点，因为你的代码没有贴完整，尤其是没有显示draw的调用代码追问
调用的
Form的AutoRedaw属性设为True
追问看是看到了就是一点显示不是线
For c = 1 To cishu - 1
X1 = c - 1: Y1 = data(c - 1)
X2 = c: Y2 = data(c)
Picture1.Line (X1, Y1)-(X2, Y2), QBColor(0) '这行要放到For循环里面！否则它就只运行一次了！
Next c
Form1.AutoRedraw = True
Picture1.AutoRedraw = True
另，你的Picture1.BackColor属性也改一下试试。
还有，在画图的循环里加一个语句，看看有没有进入循环。
If kkk(0) = 2 Then
Label2.Caption = inbuf(0)
If Val(Label9.Caption) = &H1 Then
kk = inbuf(0) * 100 / 153
Text1.Text = kk
datate(cishu) = kk
Grid.Col = 1: Grid.Row = cishu + 1
Grid.Text = kk
cishu = cishu + 1
绘图程序
Private Sub draw()
Picture1.Cls
Picture1.DrawWidth = 1
Picture1.BackColor = QBColor(15)
Picture1.Scale (0, 200)-(200, 0)
For c = 1 To cishu - 1
X1 = (c - 1): Y1 = datate(c - 1)
X2 = c: Y2 = datate(c)
Picture1.Line (X1, Y1)-(X2, Y2), QBColor(0)
doevents
Next c
doevents
End Sub
再调用一下Picture1.Refresh
另外要在窗体加载之后再划线，若是放到form_load里，是肯定不显示的。以前我画过，程序代码都没问题，在窗体加载后调用划线程序就可以显示了追问
窗体加载后再画线我不是太理解
VB中,运行后,没报错,可是picturebox里怎么也显示不了画的图
因为flag是局域变量总是false，把flag定义到form内
VB中picturebox无法显示全部图片,只有一小部分
从你的自定义坐标系来看，你的横坐标的可见范围是100到50，这也就是说凡是x大于100或小于50的数据就无法显示在Picture1中，因此你的整条Y轴都无法出现（因为x=0）。从你的后续程序来看，应该是这样才正确：Picture1.Scale (100, 0)-(0, 35)另外，为了显示出坐标轴线、刻度、X轴Y轴原点这些数据...
VB为什么 picturebox及image里图片在运行时显示空白?
检查控件的visible属性是否设置为true 是否将这两个控件放到其他容器里 而那个容器又设置为不显示
vb.net TabControl切换TabPage时,TabPage内的PictureBox不能显示...
想必你一定是用PictureBox1的graphics直接绘制的，不存在程序语句错误，问题在于绘制后TabPage切换时并没有被自动刷新，所以图形存在但不显示（按钮点击可以画出来相当于手工刷新了）你可以定义一个bitmap，在TabControl2_Selected函数中先用这个bitmap的graphics绘制图形，然后PictureBox1.Image=这个bitmap ...
vb中在picturebox里画好了坐标系,在坐标系上画圆,圆不显示,不画坐标系...
1. 将坐标系原点移到PictureBox的中心。可以通过设置PictureBox的Anchor属性或者使用代码控制PictureBox的位置实现。2. 计算平移的距离dx和dy。dx = Ox + Cx - PictureBox.Width \/ 2 dy = Oy + Cy - PictureBox.Height \/ 2 3. 将坐标系各点的坐标按照平移距离进行平移。4. 将圆的半径进行缩放...
用VB的picturebox控件画图像,只能保持一会儿就消失了。
那是因为picturebox的autoredraw属性为false。只要窗口没被遮挡过图像就一直在，比如你把窗口拖到显示器边上挡住一部分再拖回来，档过的地方图就没了，最小化窗口在回来图像也没了。把AutoReDraw设为true就能让图像自动刷新。如果你用了一个比较慢的过程一点一点的画图的话（比如画几万个点），false的...
VB中在picturebox中应用Line函数为什么画不出直线
极为重要。利用这些方法，在改变对象大小或隐藏在另一个对象后又重新显示的情况下，设置 AutoRedraw 为 True，将在 Form 或 PictureBox 控件中自动重绘输出。运行时 在程序中设置 AutoRedraw，可以在画持久图形（如背景色或网格）和临时图形之间切换。如果设置 AutoRedraw 为 False，以前的输出成为背景...
vb picturebox控件中可以画曲线吗
当然可以的！用vb做仪表盘一般都要画曲线的
用VB的picturebox采用Line函数画实时曲线之后,曲线满屏之后,如何让它...
用picture1.cls清屏，再重新画。清屏之后，需要把当前坐标也从0开始。假如你的坐标系最大值为20，那么你的X值需要mod 20的。
vb.netpicturebox出现红叉
1、图像路径错误：确保提供的图像路径是正确的，并且图像文件存在于该路径下。2、图像格式不受支持：确保加载的图像格式是PictureBox控件所支持的，常见的支持的格式包括BMP、JPG、GIF和PNG等。3、图像文件损坏：如图像文件损坏，那么PictureBox控件无法正确加载它，尝试使用其他图像文件来测试是否能够正常显示...
