hatena
hatena
2020/08/04 (火) 13:03:34
マウスクリックより、フォーカス取得時とフォーカス喪失時に設定するのがいいと思います。
Private Sub テキスト5_Enter()
Me.テキスト5.Height = Me.テキスト5.Height * 2 '高さを2倍に
End Sub
Private Sub テキスト5_Exit(Cancel As Integer)
Me.テキスト5.Height = Me.テキスト5.Height / 2 '高さを元に戻す
End Sub
通報 ...