またお世話になります。よろしくお願い致します。
Printメソッドの出力を1行で行いたいのですが。
フォームに出力するなどの場合、
通常、Pr.Print 〜 とすると改行されてしまいます。
下のFor Each 〜 Next文の例では
0
1
2
3
4
というようになってしまいます。
これを、
0 1 2 3 4
というように、1行で行いたいのですが。
どうか、よろしくお願い致します。
Dim Pr As Form
Dim X() As Integer
Dim nCase As Integer
nCase = 4 ’その都度変わります
ReDim X(nCase)
For i = 0 To nCase
X(i) = i
Next i
Form_Kekka.Show
Set Pr = Form_Kekka
For i = 0 To nCase
Pr.Print X(i)
Next i
セミコロンをつけると改行されなくなります。
Pr.Print X(i) & " ";
とか
ABC様
ありがとうございました。
いろいろ知らないテクニックがあるものですね。
大変助かりました。
ツイート | ![]() |