当我们想将一些讯息分门别类时,最常使用的控制项就是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->