本人要做个上位机软件
如下图：
根据数据库里查询的数据 在picturebox中显示出来
有下面问题没有解决
1）根据不同的横坐标画不同的颜色。颜色是RGB颜色
2）一小问题 怎么在picturebox建立坐标，并有刻度，（志需要X轴的刻度）
请教高手。。

左边有一颜色条  在不同的数据 显示不同的颜色
左边轴 刻度 现在只要X轴的刻度就可以了

I

写完了右边的图例，在写左边坐标线时，不想写了。放弃。

写好的右边的图例的代码如下：没有任何注释，勉强看吧。

Public Sub 画图标(pic As PictureBox)
Dim i As Long
Dim j As Long
Dim m As Double
Dim k As Long
Dim n As Long

m = (pic.Height - 256) / (256 * 2)

k = 10
n = 10
For i = 0 To 255
    pic.Line (0, i * m - m)-(512, i * m), RGB(255 - i, i, 0), BF
Next i

For i = 0 To 255
    pic.Line (0, i * m + 254 * m)-(512, i * m + 255 * m), RGB(0, 255 - i, i), BF
Next i

m = (pic.Height - 256) / 4

pic.CurrentX = 550
pic.CurrentY = 0
pic.Print 500

pic.CurrentX = 550
pic.CurrentY = m
pic.Print 400

pic.CurrentX = 550
pic.CurrentY = m * 2
pic.Print 300

pic.CurrentX = 550
pic.CurrentY = m * 3
pic.Print 200

pic.CurrentX = 550
pic.CurrentY = m * 4
pic.Print 100

End Sub

忘了画线的部分。你自己加上去吧。

画线命令是
pic.line(坐标X1，坐标Y1）-（坐标X2，坐标Y2），颜色

左边的标尺差不多。

主体图像的绘制时注意，不要用画点命令，用画框命令。防止点太小了。
坐标刻度是缇，自己要记得转换为 象素或 磅。
看数据的格式，从上到下，从左到右。或从左到右，从下到下。或反之，都行。
事先定义好4个颜色量来，
如果当前数据，四舍五入后，得哪个整数，就用这个颜色量画一个方块就是了。注意坐标，下一个框的坐块与上一个块不能有任何坐标同掉，只能，也只需要相差1象素。

就说这么多了，你自己琢摸吧。

谢谢 楼上各位

学习

  学习

不过上面的  代码 不可以在  form_load中实现

路过学习。