45fan.com - 路饭网

搜索: 您的位置主页 > 电脑频道 > 电脑教程 > 阅读资讯:如何制作分隔线控件?

如何制作分隔线控件?

2016-08-29 10:33:04 来源:www.45fan.com 【

如何制作分隔线控件?

新建一个VisualBasic的Windows控件库。在项目中添加两个用户控件,一个为:LineH水平分隔线,一个为:LineV垂直分隔线,代码如下。经过生成.dll,在其他项目引用,就可以使用。

分割线控件下载地址:http://download.csdn.net/source/1447072

在界面中使用分割线的例子:看日期下面的分割线。

如何制作分隔线控件?

=============水平分隔线LineH.vb的完整代码=============

如何制作分隔线控件?''''水平分隔线LineH.vb的完整代码
如何制作分隔线控件?如何制作分隔线控件?PublicClassLineH
如何制作分隔线控件?
InheritsSystem.Windows.Forms.UserControl
如何制作分隔线控件?
如何制作分隔线控件?如何制作分隔线控件?
"Windows窗体设计器生成的代码"
如何制作分隔线控件?
如何制作分隔线控件?如何制作分隔线控件?
PrivateSubLineH_Paint(ByValsenderAsObject,ByValeAsPaintEventArgs)HandlesMyBase.Paint
如何制作分隔线控件?
DimgAsGraphics=e.Graphics
如何制作分隔线控件?
DimrAsRectangle=Me.ClientRectangle
如何制作分隔线控件?
DimdarkPenAsPen=NewPen(SystemColors.ControlDark,1)
如何制作分隔线控件?
DimLightPenAsPen=NewPen(Color.White)
如何制作分隔线控件?
''''用暗色调处理上边缘
如何制作分隔线控件?g.DrawLine(darkPen,r.Left,r.Top,r.Right,r.Top)
如何制作分隔线控件?
''''用亮色调处理下边缘
如何制作分隔线控件?g.DrawLine(LightPen,r.Left,r.Top+1,r.Right,r.Top+1)
如何制作分隔线控件?
EndSub

如何制作分隔线控件?
如何制作分隔线控件?
EndClass

如何制作分隔线控件?
如何制作分隔线控件?

=============垂直分隔线LineV.vb的完整代码=============

如何制作分隔线控件?''''垂直分隔线LineV.vb的完整代码
如何制作分隔线控件?如何制作分隔线控件?PublicClassLineV
如何制作分隔线控件?
InheritsSystem.Windows.Forms.UserControl
如何制作分隔线控件?
如何制作分隔线控件?如何制作分隔线控件?
"Windows窗体设计器生成的代码"
如何制作分隔线控件?
如何制作分隔线控件?如何制作分隔线控件?
PrivateSubLineV_Paint(ByValsenderAsObject,ByValeAsPaintEventArgs)HandlesMyBase.Paint
如何制作分隔线控件?
DimgAsGraphics=e.Graphics
如何制作分隔线控件?
DimrAsRectangle=Me.ClientRectangle
如何制作分隔线控件?
DimdarkPenAsPen=NewPen(SystemColors.ControlDark,1)
如何制作分隔线控件?
DimLightPenAsPen=NewPen(Color.White)
如何制作分隔线控件?
''''用暗色调处理左边缘
如何制作分隔线控件?g.DrawLine(darkPen,r.Left,r.Top,r.Left,r.Bottom)
如何制作分隔线控件?
''''用亮色调处理右边缘
如何制作分隔线控件?g.DrawLine(LightPen,r.Left+1,r.Top,r.Left+1,r.Bottom)
如何制作分隔线控件?
EndSub

如何制作分隔线控件?
如何制作分隔线控件?
EndClass

如何制作分隔线控件?
如何制作分隔线控件?

在win2000+vs2003编译通过。

 

本文地址:http://www.45fan.com/dnjc/69257.html
Tags: 制作 控件 VB.NET
编辑:路饭网
关于我们 | 联系我们 | 友情链接 | 网站地图 | Sitemap | App | 返回顶部