画在picturebox上,背景是黑色的,线是白色的,鼠标拖着可以左右移动,类似股票软件. 当然移动时,前面显示的白线应该是消失的. 始终只看到一条竖线.
研究很长时间了,不知道这里有没有高手指点?

Sub hh()
Dim Kos As New Bitmap(Pic1.Width, Pic1.Height)
Dim Vcr As Graphics
Dim Pp As New Pen(Color.Red)
Pp.Width = 2
Vcr = Graphics.FromImage(Kos)
Vcr.DrawLine(Pp, 0, 0, 100, 100)
Pic1.Image = Kos
End Sub

新开一楼好了。
@自由人98
如果调用Sub hh的话，每次调用会新建一个Bitmap，一个Graphic，一个Pen。
我觉得这样可能更好些：
把Kos定义成Public Shared，Vcr也定义成Public Shared，然后在Form load时把FromImage搞定。
hh里面只包括DrawLine和Vcr.Invalidate()
Invalidate负责抛出一个画图事件，启动Graphic内部的OnPaint函数，刷新显示。
话说.Net的画图真的挺恶心。。。但是效率是比VB6高了

wpf有GridSpliter控件，可以用wpf control host调用，能满足这个要求

太复杂了,效果也不好