关于Picture串位的问题
Picture1.Cls
Picture1.AutoRedraw = True
For it = 2 To MSFlexGrid1.Rows - 1
s = MSFlexGrid1.TextMatrix(it - 1, 2)
m = MSFlexGrid1.TextMatrix(it, 2)
Picture1.Scale (0, 4)-(MSFlexGrid1.Rows, -1)
Picture1.ForeColor = vbRed
Picture1.Line (it - 1, Val(s))-(it, Val(m))
Next
For it = 1 To MSFlexGrid1.Rows - 1
Picture1.ForeColor = vbBlue
m = MSFlexGrid1.TextMatrix(it, 2)
Picture1.CurrentX = it
Picture1.CurrentY = Val(m)
Picture1.Print Val(m)
Next
For ip = -1 To 3
Picture1.ForeColor = vbBlack
Picture1.CurrentX = 0
Picture1.CurrentY = Val(ip)
Picture1.Print Val(ip)
Next
现在显示串位，如果光调整 Picture1.CurrentX = it - 1 或+1，那么他向相反的方向串，即使通过it - 1或-0.5等等调整当前数据到合理状态，将来如果数据变多或变少时（MSFlexGrid1.Rows的值）就串位了，比如现在就有两个数据，2和3，那么现在调整好了，将来数据多的时候他又慢慢串位了，有人说是分辨率的问题，该如何解决呢，换一种写法也可以
[解决办法]
不知你想完成什么功能？
