走近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]") 
|