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)にしてもだめでした。

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

【62472】コントロールボックス内で改行するには チューリップ 09/7/23(木) 20:58 質問
【62473】Re:コントロールボックス内で改行するには チューリップ 09/7/23(木) 21:01 発言
【62474】Re:コントロールボックス内で改行するには kanabun 09/7/23(木) 21:07 発言
【62475】Re:コントロールボックス内で改行するには かみちゃん 09/7/23(木) 21:08 発言
【62476】Re:コントロールボックス内で改行するには チューリップ 09/7/23(木) 21:34 お礼

19688 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free