使用Line方法,向Form,PictureBox这些控件都支持这个方法。语法:object.Line [Step] (x1, 1) [Step] (x2, y2), [color], [B][F]如:Me.Line (100,100)-(600,600), vbred, bf加B这个参数就是矩形,加F就是用就边框颜色填充 补充:Color参数就是边框颜色,如果省略,就用对象的ForeColor(前景色,就是字体的颜色) 属性值