'LinkClicked イベント Dim target As String = TryCast(e.Link.LinkData, String) textBox1.Text = $"[{target}]" '前後に空白が無いか確認するため、[~]を補う textBox2.Text = e.Link.Name textBox3.Text = e.Link.Description