命令を順番に起こるようにするには？ (ID:115823)

名前

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

本文 環境はVB6です。 static i as integer とかにすればいいんですか？（すいません。よくわからないです） if文の中の命令がその次のif文に反映するようにするにはどうすればいいのでしょうか？ … Dim str as String Static i as Integer i=1 If i=1 And str="文字①" Then strをしゃべらせる命令 i=2 If i=2 And str="文字②" Then 'i=2が反映されないため命令②が起きません。また文字①を入力したら文字①をしゃべってしまいます。 strをしゃべらせる命令 End if End if 文字①を入力すれば当然、文字①はしゃべるのですが、その後文字②を入力してもしゃべってくれません。 結構長くなるのであまり詳しく載せられないですが、こんな感じです。分かりにくくてすいません。m(_ _)m 方法を変えたほうがいいでしょうか？