做出分隔线

2018-06-17 17:11:27来源:未知 阅读 ()

新老客户大回馈,云服务器低至5折

当我们想将一些讯息分门别类时,最常使用的控制项就是Frame;不过我们也可利用
两个Line控制项来做出分隔线,以将讯息分类。其效果有点类似网路上常看到的
HorizontalLine,或是微软产品的/说明/关於.../
中的那个分隔线。例如以下程式码可
产生如下图的效果:

请先加入两个Line控制项到表单上

PrivateSubForm_Load()
WithLine1
.BorderColor=&H808080
.X1=0
.X2=5000
.Y1=1100
.Y2=.Y1
EndWith
WithLine2
.BorderColor=vbWhite
.BorderWidth=2
.X1=Line1.X1
.X2=Line1.X2
.Y1=Line1.Y1 20
.Y2=.Y1
EndWith
Line1.ZOrder0
EndSub->

标签:

版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有

上一篇:快速初始化Variant和String类型数组

下一篇:编写快速高效的VB程序