这个必须用控件的方法解决，VB6有个Line控件很容易解决这个问题，但是VB.NET没有了，幸好微软也想到了这个缺陷，提供免费的Visual Basic PowerPacks控件箱，其中有Line控件。
成都创新互联长期为数千家客户提供的网站建设服务，团队从业经验10年，关注不同地域、不同群体，并针对不同对象提供差异化的产品和服务；打造开放共赢平台，与合作伙伴共同营造健康的互联网生态环境。为乐山企业提供专业的做网站、网站设计，乐山网站改版等技术服务。拥有十载丰富建站经验和众多成功案例,为您定制开发。
Visual Basic PowerPacks下载地址：
使用 LineShape 控件绘制直线：
dim bmp as new bitmap(width,height)dim g as graphics=graphics.fromimage(bmp)g.drawlines(pen.blue,20,20,100,20)backgroundimage=bmp
绘图是系统内部操作的，不需要懂原理
方法就在那里，只有会用和不会用，你的代码告诉它绘制，它就会绘制。它（方法）究竟如何去绘制的并不是重点，反正它会绘制。
drawline（绘线）方法很简单，第一个参数是pen,它确定线条的颜色、宽度和样式。第二、第三个参数都是point类型，确定两个点的位置，绘制直线。
不想整个重画，最好用单色的背景，例如黑色，线条是白色的
用变量把线条的内容备份
当想改变线条的位置或者长度之前，先用存下来的变量以黑色重画一次，覆盖原来的白色线条
然后再画新的白色线条，这种重画方法比较节省资源
假如需要用花哨的背景或者图片当背景，也可以用局部重回的方式。
代码就不提供了，只提供思路。