VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日: 2006/03/30(Thu) 12:05
投稿者風見鶏
Eメール
URL
タイトルRe^4: MS−WORDのようなフォント強制設定

Starfishさん、回答ありがとうございます。

>  日本語は、&H80以上かで見ればいいのでは。"\"のフォントが日本語の
> フォントは円マークですが、あちらのフォントはバックスラッシュです
> このあたりも対応が必要かも。

記述していただいたコードで、リッチテキストに”あ”を入力して、ブレークさせて
ステップごとに動作させてみましたが、

If Asc(RichTextBox1.SelText) < &H80 And Asc(RichTextBox1.SelText) <> &H5C Th
en

にてElse側の処理に移らなかったので、

If AscB(RichTextBox1.SelText) < &H80 And AscB(RichTextBox1.SelText) <> &H5C
Then

Asc関数をAscB関数に変更して動作しました。
これだとElse側の処理に移りましたが、問題ないでしょうか?

このコードでいろいろ試してみたいと思います。


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- VBレスキュー(花ちゃん) - - Web Forum -