メニューエディタでテキストボックスで選択した文字を太字にしたいのですが
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です。
うん。TextBoxということなら"一部分だけ"というのは不可能…です。
>ガッさん
わかりました(^o^)ゞ、ありがとうございます。
ツイート | ![]() |