Question

为什么我用vb画的直线不显示？

Private Sub Form_Load()
Me.AutoRedraw = True
Me.ScaleMode = 3
Me.DrawWidth = 3
Line (9400, 3480)-(9760, 3680), RGB(&HFF, 0, 0)
End Sub
上面的坐标是在查看对象中根据其他点计算的 应该没什么问题啊

Answer 1

问题出在你的坐标上面，你的坐标是远远超出了当前窗体的大小范围的，虽然它的确是画了，但是不在你所能够看到的屏幕上。你可以把坐标改小点试试就可以看到了。
Private Sub Form_Load()
Me.AutoRedraw = True
Me.ScaleMode = 3
Me.DrawWidth = 3
Line (100, 180)-(160, 180), RGB(&HFF, 0, 0)
End Sub

追问

那怎么确定在那个框架中的位置呢？我上面的坐标是根据插入图片的坐标画的啊

追答

这里的数字坐标是像素为单位的，你可能要转换一下单位，让这里的单位与你图片中的单位统一，你先看看你图片中的单位是什么？是Twip Pixel 还是什么。

Answer 2

Private Sub Form_Load()
Me.AutoRedraw = True
Me.ScaleMode = 1
Me.DrawWidth = 3
Line (9400, 3480)-(9760, 3680), RGB(&HFF, 0, 0)
End Sub