投稿日 | : 2004/09/01(Wed) 21:54 |
投稿者 | : 中年プログラマー |
Eメール | : |
URL | : |
タイトル | : Re: テキストボックスが表示されない |
> 下記のプログラムで、配列コントロールtext1(posi)とが表示されません。
> ステップで実行すると 計測中 → 測定値 → 変化した測定値 と
> ちゃんと変わってくれるのですが、Runすると表示せずにループを抜けた
> 後で最後の測定値を表示します。
> Text1(posi).Text = "******" の前後にウェイトを咬ませてみたりしまし
> たが結果は同じでした。
> どなたか原因がわかる方、予測のつく方はご教示願います。
>
> Do
> If (Timer - starttime) < wait_time Then 'wait中
> If Text1(posi).Text = "" Then
> Text1(posi).Text = "計測中"
> End If
> Else
> If Text1(posi).Text = "計測中" Then
> Text1(posi).Text = CurVal
> End If
> If Val(Text1(posi).Text) > CurVal Then
> Text1(posi).Text = CurVal
> End If
> End If
> Loop While (GetSW = ON)
すいません。 DoEventsを入れ忘れてました。