VB中控件Line的问题
发布网友
发布时间：2023-01-01 03:35
共2个回答
热心网友
时间：2023-11-28 10:07
Line (-1, ly - 1)-(lscalewidth, ly + 1), , B '这时候边框是透明的，是看不到的，而中间有1像素的高度显示的是FillColor颜色；
Line (-1, ly - 1)-(lscalewidth, ly), , B '这时候矩形的上下边框是紧挨着的，而且是透明的，是看不到的，因此整个矩形就都变成透明了，看不到了；
Line (-1, ly)-(lscalewidth, ly), , B '这时候矩形的上下边框是重叠的，这种情况VB会进行特殊处理，把它看作是直线（不再是矩形），显示的是FillColor颜色（因为直线是没有边框的）。
因此，上述情况1、3可实现你要的功能，而2则不能实现。
事实上只要把DrawStyle = vbInvisible这行删掉或改为DrawStyle = 0则上述三种情况都变得OK了！
热心网友
时间：2023-11-28 10:07
Line 方法
在对象上画直线和矩形。
语法
object.Line [Step] (x1, 1) [Step] (x2, y2), [color], [B][F]
Line 方法的语法有以下对象限定符和部分：
