在控件的内部边缘画四条线，只看到左边和上边的，看不见右边和下边的，何解？？？

Question

UserControl.Width 换成usercontrol.scalewidth
你可以看一下属性，这两个是有区别的，值不同

Answer 1

to:danielinbiti(金)
代码改成这样了：
UserControl.Line (0, 0)-(UserControl.ScaleWidth, 0), vbYellow
UserControl.Line (0, 0)-(0, UserControl.ScaleHeight), vbYellow
UserControl.Line (UserControl.ScaleWidth, 0)-(UserControl.ScaleWidth, UserControl.ScaleHeight), vbYellow
UserControl.Line (0, UserControl.ScaleHeight)-(UserControl.ScaleWidth, UserControl.ScaleHeight), vbYellow
还是一样不行啊！！！

Answer 2

UserControl.Line (0, 0)-(UserControl.ScaleWidth - 1, 0), vbYellow
UserControl.Line (0, 0)-(0, UserControl.ScaleHeight - 1), vbYellow
UserControl.Line (UserControl.ScaleWidth - 1, 0)-(UserControl.ScaleWidth - 1, UserControl.ScaleHeight - 1), vbYellow
UserControl.Line (0, UserControl.ScaleHeight - 1)-(UserControl.ScaleWidth - 1, UserControl.ScaleHeight - 1), vbYellow
一般情况下这样可以了，因为你的DrawWidth是1(如果是2、3就把上面的1替换为2、3)，这样应该从ScaleHeight(ScaleWidth) - 1开始画才对。
--------------------------------------------------------------------
欢迎使用Fantasia Photo(http://3rdapple.51.net/FantasiaPhoto.htm)
--------------------------------------------------------------------
Welcome to Thirdapple's Studio(http://3rdapple.51.net/)

Answer 3

再将ScaleMode设为3，就不会有问题了