vb Picture 画矩形的问题

来源：百度知道编辑：UC知道时间：2024/05/16 05:06:56

在工程1中的窗体上添加picture1，然后添加如下代码
Option Explicit

Private Sub Form_DblClick()
Picture1.Width = 2000
Picture1.Height = 2000
Picture1.Line (0, 0)-(2000, 2000), , B
End Sub

这段代码的结果应该是沿着picture1的边框画一个矩形才对，可是实际情况是：只能看到矩形的左面的边和上面的边，下面的边和右面的边却看不到，如果将Picture1.Line (0, 0)-(2000, 2000), , B中的2000改为1900，就可以看到期望的效果了。我的疑问就是：好像画矩形的时候的第二个坐标点的实际位置会向右下方向偏？我已经试过不同的ScaleMode，Appearence属性了，还是这样。请高手指点！

因为picturebox有边框，内径当然要比边框小，你先把它的宽度设成了2000，画的东西也有2000，所以画的东西被挡住了，你试试以下代码：
Option Explicit

Private Sub Form_DblClick()
Picture1.Width = 2080
Picture1.Height = 2080
Picture1.Line (0, 0)-(2000, 2000), , B
End Sub

因为picturebox有边框，内径当然要比边框小，你先把它的宽度设成了2000，画的东西也有2000，所以画到外面（内径的外面）了

VB中picture问题 VB picture中图像随picture大小变化 vb picture的picture属性是什么类型的？ vb中哪个是picture控件 vb中picture.refresh什么意思? VB里Picture控件的问题 vb Picture 画矩形的问题 VB Picture中的控件如何释放? VB里面的picture是什么意思，作用是什么 vb求助，在picture中插入一幅图片，怎样让picture控件自动适应图片大小？？