こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

Microsoft Visual Basic 6.0でテキスト1に表示させたい。

Dim i As Integer
Private Sub Command1_Click()
For i = 100 To 1 Step -1
If i Mod 3 = 2 Then
Debug.Print i
End If
Next i
End Sub
のプログラムがあるのですがプログラミング結果が
イミディエイトの方に表示されるのですが
このプログラムの結果をtext1に表示させたいのですが
どのようなプログラムにすれば良いでしょうか?
詳しい方教えてください。

投稿日時 - 2007-06-07 03:57:19

QNo.3063401

すぐに回答ほしいです

質問者が選んだベストアンサー

現在、Debug.Print i と書いている行のところに
Text1.Text = i と書けば良いのですが、それだと一瞬で最後の答え(2)が表示されるだけです。
Text1のMultiLineプロパティをTrue、ScrollBarsプロパティを2にして、Text1.Text = Text1.Text & i & vbCrLf と書けばイミディエイトウインドウと同じイメージで表示されます。
Forループの前にText1.Text = ""と書くか、プロパティウインドウで、Textプロパティの中身(初期値=Text)を消しといて下さい。

投稿日時 - 2007-06-07 06:15:35

ANo.1

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(1)