两个 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
上一篇: 一个封装了WinInet API函数的类(CWinInetConnection)
下一篇: 在VB中模拟实现邮件传输
文章整理:西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!




