1文字ずつ文字を表示するには？

質問

VBでゲームの様に文章を1文字ずつ表示させたいのですがどうすれば良いでしょうか？

回答No.2

INAHO_SH4 · ベストアンサー

サウンドノベルかアドベンチャーでしょうか？

では，作戦その２ｗ

left(文字列，取り出す長さ) と言う命令がBasic言語の初期の頃からあると思います。
文字列の左から（用ははじめの方から）指定した長さを取り出すという命令です。
文字のフォントをMSゴシックのような等幅フォントにすれば文字の桁もそろうと思います。

後はタイマーなりで一定間隔を作り，取り出す文字列を増やして，それをウィンドウにに書けばそれっぽく表示されると思いますよ。

A No1 の imogashi さんの方が色を変えたり，サイズを変えたり，ボルド・イタリックなどを個別に指定て描けるなどと自由度は高いと思います。

ご参考程度に・・・

お礼

勉強になりました

回答No.3

INAHO_SH4

先ほど A No2 で回答した INAHO_SH4 です。

ごめんなさい，肝心なことを書き忘れてました。

この方法はテキストボックスのような物で有効です。
もしくは書き始める座標を同じ位置で書くか，DirectDrawなどで毎度毎度書き直すような場合に書き始めの座標を同じ位置で指定する場合です。

いっぱい座標を指定しない分，ソフトは簡単かな？という処理方法です。

回答No.1

imogasi

（１）文章の文字列をつくり、Ｍｉｄ（Ｓ，ｉ，１）でｉを１つづつ増やしていけば１文字は捉えられる。
（２）もう１つの課題は、は表示のタイミングを、（何秒かのオーダーぐらいか？）適当な時間間隔をあけて実行する。
文字を書く台紙に当たるものは何かな。
（２）は、先日セルの文字列をブリンクさせる質問があったが、そういうところにコード例があった。「点滅　ＶＢ」で照会したら。
あるいはＯｎｔｉｍｅや、Ｔｉｍｅｒなどで照会してみては。
http://dobon.net/vb/bbs/log3-17/10002.html
参考
http://homepage1.nifty.com/rucio/main/Toukou/T6_StepupPuzzle.htm