テキストボックスに入力した改行を確認する

質問

例えば、テキストボックスに文章を入力したとします。そして、その文章を入力した時、何回か改行をしたとします。その改行を探したいのですが、方法がわかりません。
ループしながら文字列を1文字ずつ反転させていき、改行されているところまで来たらmsgboxを出す。というような事がしたいのです。むしろ、改行を反転できるのか、そこのところもよくわかりません。

If Text1.SelBold = true Then

↑この様な感じでif文の条件にする方法はないでしょうか。（これは太字ですが）

Text1.●●

●●に入れるべきものがわかりません。ご存知の方いらっしゃいましたらご教授願います。そんな方法ないよという事でしたら、その事も教えていただければ幸いです。よろしくお願いします。

回答No.1

hawkwind · ベストアンサー

入力された文字コードは全部記録されています。
改行やTABなどは制御文字といいましてASCIIコードの前半部が該当します。
これらの判定にはASCIIコードで行います。

例えば次の文を実行してみて下さい。
Input A
msgbox ASC(A)

色々な文字のASCIIコードが分かると思います。
特殊文字を扱う場合はどこかでASCIIコード表を用意した方が便利です。

条件判定では
if asc(A) = vbCRLF then ～
となると思います。

改行はコード上CR(13H)ですが、CRLFになることもあります。

改行を反転させるには、自前で改行マークを用意して、
それを改行コードのあるところへ挿入して反転させます。

こちらの表現方法は色々検討して下さい。

お礼

お礼が遅くなってしまいすみませんでした。教えていただいたことを参考に解決することが出来ました。本当にありがとうございました。