在VB.NET中使用新的控件labellink访问网页

---

　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:vbnetcn@163.com")

 

本文作者:

---

« 
» 

---