DataGridViewのセルにリンク文字列を表示させる方法

DataGridViewのセルにリンク文字列を表示させる方法
VB.NET

'リンク作成
Dim column As New DataGridViewLinkColumn()
column.Name = "lnk"
column.UseColumnTextForLinkValue = True
column.Text = "表示"
column.LinkBehavior = LinkBehavior.HoverUnderline
column.TrackVisitedState = True
dgv1.Columns.Add(column)

C#

//リンク作成DataGridViewLinkColumn column = new DataGridViewLinkColumn();
column.Name = "lnk";
column.UseColumnTextForLinkValue = true;
column.Text = "表示";
column.LinkBehavior = LinkBehavior.HoverUnderline;
column.TrackVisitedState = true;
dgv1.Columns.Add(column);

DataGridViewセル内のリンククリックイベントを捕獲する方法
VB.NET

Private Sub dgv1_CellContentClick(ByVal sender As Object, _
        ByVal e As DataGridViewCellEventArgs) _
        Handles dgv1.CellContentClick
    Dim dgv As DataGridView = CType(sender, DataGridView)
    If dgv.Columns(e.ColumnIndex).Name = "Link" Then
        MessageBox.Show((e.RowIndex.ToString() + "行クリック"))
        Dim cell As DataGridViewLinkCell = _
            CType(dgv(e.ColumnIndex, e.RowIndex), DataGridViewLinkCell)
        cell.LinkVisited = True
    End If
End Sub

C#

private void dgv1_CellContentClick(object sender,
    DataGridViewCellEventArgs e)
{
    DataGridView dgv = (DataGridView)sender;
    if (dgv.Columns[e.ColumnIndex].Name == "Link")
    {
        MessageBox.Show(e.RowIndex.ToString() + "行クリック");
        DataGridViewLinkCell cell =
            (DataGridViewLinkCell)dgv[e.ColumnIndex, e.RowIndex];
        cell.LinkVisited = true;

    }
}