VB.NET, C#, PowerShell Tipsサイト

 'マウスがテキスト上にある場合の処理
Private Sub LinkLabel1_MouseEnter(ByVal sender As Object, _
     ByVal e As System.EventArgs) Handles LinkLabel1.MouseEnter
    'フォントを太字にする
    LinkLabel1.Font = New Font(LinkLabel1.Font, FontStyle.Bold)
End Sub

'マウスがテキスト上から離れた場合の処理
Private Sub LinkLabel1_MouseLeave(ByVal sender As Object, _
    ByVal e As System.EventArgs) Handles LinkLabel1.MouseLeave
    'フォントをレギュラーにする
    LinkLabel1.Font = New Font(LinkLabel1.Font, FontStyle.Regular)
End Sub