Printメソッドの出力を1行で行うには?

解決


聖二  2004-09-29 04:50:24  No: 85801

またお世話になります。よろしくお願い致します。

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


ABC  2004-09-29 05:40:20  No: 85802

セミコロンをつけると改行されなくなります。

Pr.Print X(i) & " ";
とか


聖二  2004-09-30 00:39:35  No: 85803

ABC様
ありがとうございました。

いろいろ知らないテクニックがあるものですね。
大変助かりました。


※返信する前に利用規約をご確認ください。

※Google reCAPTCHA認証からCloudflare Turnstile認証へ変更しました。






  このエントリーをはてなブックマークに追加