メニューエディタで選択した太字を実行するには？ (ID:125926)

名前

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

本文 メニューエディタでテキストボックスで選択した文字を太字にしたいのですが Private Sub mnuBOLD_Click() If Not txtMEMO.SelText = "" Then MnuBOLD.Checked = Not MnuBOLD.Checked txtMEMO.FontBold = Not txtMEMO.FontBold End If End Sub だと選択してない文字まで太字になってしまいます リッチテキストのselboldじゃないとできないのでしょうか？ 環境はXPのVB6.0です。