Labelについて (ID:104415)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 Private Sub Label1_MouseDown _ (Button As Integer, Shift As Integer, X As Single, Y As Single) Label1.BorderStyle = 1 End Sub Private Sub Label1_MouseUp _ (Button As Integer, Shift As Integer, X As Single, Y As Single) Label1.BorderStyle = 0 End Sub ちょっと無理矢理すぎるかも。。。。