Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

19688 / 76732

←次へ　｜　前へ→


	【62472】コントロールボックス内で改行するには

チューリップ - 09/7/23(木) 20:58 -


	引用なし

	パスワード

こんばんは、またよろしくお願いします。
ラベル上にコマンドボタンをおいて、コマンドボタンの上にマウスを乗せると
メッセージが表示されるというのを作りましたが、メッセージが長いので改行したいのです。

例）CommandButton1を
　　押しましょう　　　　　　　　と表示したい
------------------------------------------------------------------

Private Sub CommandButton1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
　　TextBox1.Text = "CommandButton1を" & vbCrLf & "押しましょう"
　　If Not Label1.Visible Then Label1.Visible = True
End Sub

Private Sub Label1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
　　TextBox1.Text = ""
　　Label1.Visible = False
End Sub
------------------------------------------------------------------
ところが、このようにすると「Command～を」と「押しましょう」の間に
¶という記号が表示されるだけで改行されません。
（このマッチ棒のような記号はなんでしょうか？）
vbCrlf　を　Chr(13)にしてもだめでした。

どのようにすると例）のように表示されるでしょうか・・・

53 hits

▼

【62472】コントロールボックス内で改行するには チューリップ 09/7/23(木) 20:58

≪