在程序中做出信息的分隔线
新客网 XKER.COM 2007-02-01 来源： 收藏本文
在程序中做出信息的分隔线
当我们想将一些讯息分门别类时，最常使用的控制项就是Frame；不过我们也可利用
两个 Line控制项来做出分隔线，以将讯息分类。其效果有点类似网路上常看到的
Horizontal Line ，或是微软产品的 /说明/关於.../
中的那个分隔线。例如以下程式码可
产生如下图的效果：
请先加入两个 Line 控制项到表单上
Private Sub Form_Load()
With Line1
.BorderColor = &H808080
.X1 = 0
.X2 = 5000
.Y1 = 1100
.Y2 = .Y1
End With
With Line2
.BorderColor = vbWhite
.BorderWidth = 2
.X1 = Line1.X1
.X2 = Line1.X2
.Y1 = Line1.Y1 + 20
.Y2 = .Y1
End With
Line1.ZOrder 0
End Sub
当我们想将一些讯息分门别类时，最常使用的控制项就是Frame；不过我们也可利用
两个 Line控制项来做出分隔线，以将讯息分类。其效果有点类似网路上常看到的
Horizontal Line ，或是微软产品的 /说明/关於.../
中的那个分隔线。例如以下程式码可
产生如下图的效果：
请先加入两个 Line 控制项到表单上
Private Sub Form_Load()
With Line1
.BorderColor = &H808080
.X1 = 0
.X2 = 5000
.Y1 = 1100
.Y2 = .Y1
End With
With Line2
.BorderColor = vbWhite
.BorderWidth = 2
.X1 = Line1.X1
.X2 = Line1.X2
.Y1 = Line1.Y1 + 20
.Y2 = .Y1
End With
Line1.ZOrder 0
End Sub
上一篇：将阿拉伯数字转成中文字 下一篇：用VB编程实现图像的熠熠生辉效果
最新相关文章发表评论
评论内容：不能超过250字，需审核后才会公布，请自觉遵守互联网相关政策法规。
阅读排行
随机推荐
实用信息推荐