走近VB.NET十五 在VB.NET中使用新的控件labellink访问网页
hejianzhong http:/www.yescnet.com
Public Sub New()
MyBase.New
Form1 = Me
InitializeComponent()
在InitializeComponent()下面加入初始化组件的代码
Me.LinkLabel1.Text = "http://vbnetcn.126.com" '网址
linklabel1.LinkVisited = True '是否标记已访问链接
linklabel1.LinkColor = color.Black '链接色
linklabel1.VisitedLinkColor = color.Blue '已访问链接色
End Sub
下面是linklabel的点击时触发的事件
Protected Sub LinkLabel1_LinkClick(ByVal sender As Object, ByVal e As System.EventArgs)
直接访问linklabel1.text所呈现的网址
system.Diagnostics.Process.Start(linklabel1.Text)
当然你也可以指定与linklabel1.text不同的网址或Email,如：
system.Diagnostics.Process.Start("mailto:[email protected]")
本文地址：http://com.8s8s.com/it/it6659.htm