在vb中添加网页超链接(源码)'创建一个Label以下为Label的源代码:
来源:互联网 发布:usb网络共享无法上网 编辑:程序博客网 时间:2024/05/16 03:57
在vb中添加网页超链接(源码)
'创建一个Label
以下为Label的源代码:
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Sub Form_Load()
With Label1
.Caption = "我的QQ空间"
.Font.Underline = True
.ForeColor = vbBlue
End With
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.ForeColor = vbBlue
Me.MousePointer = 0
End Sub
Private Sub Label1_Click()
ShellExecute Me.hwnd, "open", "http://user.qzone.qq.com/848741487", "", "", 5
End Sub
Private Sub Label1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.ForeColor = vbRed
Me.MousePointer = 2
End Sub
- 在vb中添加网页超链接(源码)'创建一个Label以下为Label的源代码:
- label文字添加超链接
- 在网页中为flash添加超链接的方法
- 在网页中为flash添加超链接的方法
- 当在TreeView中添加新的节点时为什么e.Label的值为null?
- iOS 为label添加中划线 下划线(商品打折)
- iOS 为label添加中划线 下划线(商品打折)
- 一个自定义LABEL组件的C#源代码
- iOS在一个label中显示不同颜色的字体
- iOS在一个Label中展示不同颜色的text
- 给label添加超链接等处理
- Label的创建方法
- label的创建
- IOS 为label创建边框
- 创建标签(Label)
- Cocos2d 控件:创建一个label
- 在Ext.FormPanel/Ext.form.FormPanel的FieldSet中实现Label的html文本超链接和TextField的整体隐藏
- label上添加中划线
- 彼岸伤痛,此岸快乐
- Web报表中如何设置超链接的样式
- 【扔掉计算器】数学心算法《超棒超快》
- (十七)是机会还是烫手山芋 - 1
- 易经给我们的64个人生智慧
- 在vb中添加网页超链接(源码)'创建一个Label以下为Label的源代码:
- 100以内的心算法
- c# word输出
- (十七)是机会还是烫手山芋 - 2
- vc6迁移到VC8
- 在C++中实现foreach循环
- 2010-1-10渥瑞达严欣老师正式创建技术博客
- kern-exec 0 问题
- fatal error LNK1103: debugging information corrupt; recompile module