vb.net2005 LinkLabel1的使用

With   Me .LinkLabel1
            .AutoSize  =   True
            .Text  =   " 百度，谷歌，新浪 "
            .LinkBehavior  =  LinkBehavior.HoverUnderline
            .LinkColor  =  Color.BlueViolet
            .LinkArea  =   New  Windows.Forms.LinkArea( 0 ,  2 )
            .Links( 0 ).LinkData  =   " http://www.baidu.com "
            .Links.Add( 3 ,  2 ,  " http://www.google.com " )
            .Links.Add( 6 ,  2 ,  " 欢迎使用新浪网 " )


         End   With

Private   Sub LinkLabel1_LinkClicked() Sub LinkLabel1_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked
        'System.Diagnostics.Process.Start(e.Link.LinkData.ToString)
        Me.LinkLabel1.Links(Me.LinkLabel1.Links.IndexOf(e.Link)).Visited = True
        If e.Link.LinkData.ToString <> Nothing And e.Link.LinkData.ToString.StartsWith("http") Then
            System.Diagnostics.Process.Start(e.Link.LinkData.ToString)
        Else
            MessageBox.Show("你按下的是：" & e.Link.LinkData.ToString, "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)

        End If
    End Sub