先引用该DLL
Private DSL As New DSCoolLabel.DSCoolLabel
Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
With DSL
'先清空旧的图标集
.ImgList.Clear()
'一个个添加图标到图标集,在后面的字串中的<IMG>将按出现的次序从该图标集读取,如第一个出现的<IMG>将使用ImgList(0),依此类推,需用户按顺序添加,以免在最终输出效果时出现图标次序错误。
.ImgList.Add(My.Resources.D__8_)
.ImgList.Add(My.Resources.share_icons)
.ImgList.Add(My.Resources.C__29_)
.ImgList.Add(My.Resources.D__8_)
.ImgList.Add(My.Resources.share_icons)
.ImgList.Add(My.Resources.C__43_)
.ImgList.Add(My.Resources.B__6_)
.ImgList.Add(My.Resources.B__40_)
.ImgList.Add(My.Resources.B__9_)
.ImgList.Add(My.Resources.B__39_)
.ImgList.Add(My.Resources.C__20_)
'绘制文字描边,默认黑色
.DrawTextOutLine = True
'行间距
.CharLine = 8
'字符间距
.CharWidth = 0
'文字投影
.DrawShadow = True
'提供给绘制程序最大的绘制区域(如窗体大小)
.TextRect = New Rectangle(0, 0, 373, 400)
'文字描边色
.TextOutLineColor = Color.Black
'包含颜色代码的字串
.Text = "<255,000,000,b><IMG>[上传]<000,255,000,b>某某人<255,255,255>上传了:<255,255,000><IMG>极点五笔7.1.rar <255,255,255>文件大小:6.3MB <255,000,000,u><IMG>扫描到威胁" & vbCrLf & "<255,000,000,b><IMG>[上传]<000,255,000,b>某某人2<255,255,255>上传了:<255,255,000><IMG>QQ2011 Beta3.exe <255,255,255>文件大小:<128,128,128>23MB<128,128,128><128,128,128>(2011年11月7日 9:13)"
.Text &= vbCrLf & "<255,000,000,b><IMG>[公告]:<000,255,000,b,u>吴总<000,255,255>:本公司各部门严防秋寒,注意保暖。请勿与他人交换毛巾、牙刷等日常生活用品。本公司服务器将在今日下午3点更新维护更新,维护时间:30分钟。希各大公司领导传达!<128,128,128> (2011年11月7日 9:21)"
.Text &= vbCrLf & "<255,000,000,b><IMG>[发言]<000,255,000,b>成员名称1<255,255,255>说:<255,255,255><IMG>请问谁有杀毒软件,麻烦传一个谢谢。<128,128,128> <128,128,128>(2011年11月7日 10:13)"
.Text &= vbCrLf & "<255,000,000,b><IMG>[发言]<000,255,000,b>成员名称2<255,255,255>说:我有的,<255,255,255><IMG>我现在就上传到我的文件夹,当我上传完毕后可以在这个界面上看到提示。 <128,128,128>(2011年11月7日 10:36)"
.Text &= vbCrLf & "<255,000,000,b><IMG>[索取文件]<000,255,000,b>成员名称3<255,255,255>请求提供文件:<255,255,000,b>卡巴斯基KIS2012安装部队套装<128,128,128> <128,128,128>(2011年11月7日 11:02)"
End With
'OutBitmap获取绘制完成的效果图
Me.Backgroundimage=DSL.OutBitmap
'注:颜色代码必须是RGB每个3位数,即使是0也要是000,如<255,000,000>表示红色
'扩展:
'<255,000,000,b>红色粗体文字
'<255,000,000,u>红色下划线
'<255,000,000,b,u>红色粗体下划线,字母大小写无所谓
End Sub
没有合适的资源?快使用搜索试试~ 我知道了~
DS彩色Label DSCoolLabel(new)
共5个文件
txt:1个
xml:1个
exe:1个
3星 · 超过75%的资源 需积分: 9 58 下载量 175 浏览量
2011-11-24
02:33:30
上传
评论 3
收藏 326KB RAR 举报
温馨提示
彩色的Label绘制,超酷超华丽。支持文字描边,投影,支持图像投影,支持字间距、行间距调整。改进了边缘裁剪算法,更精确,更减少绘制面积. 压缩包内容: 示例代码 DLL文件 XML(for .net)说明档' 效果截图
资源推荐
资源详情
资源评论
收起资源包目录
DSCoolLabel(new).rar (5个子文件)
DSCoolLabel.dll 26KB
示例代码.txt 3KB
DSCoolLabel.xml 3KB
示例(可拖图片文件至界面上).exe 145KB
preview.png 237KB
共 5 条
- 1
资源评论
- hsdxz2013-07-14不好用,用了就出错
- donge1122012-12-21还是不是源码啊,遗憾!
- AimoSoft2014-08-22不是源码,第二用起来不方便, 第三实际上不是Label 而是 生成的图片。 不是想要的。
dylike
- 粉丝: 293
- 资源: 20
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功