■ 現在のこのページの役立ち度:
表示されない場合こちらのリンクからもご覧になれます。
■ このページの役立ち度を評価する:
役立ち度を評価してください。
(1(左):あまり役立たない - 5(右):大変役立った):
■ ページの共有:
[ サイト内検索 ]
カスタム検索
#7430-0カンマのPRINTKazu2000-02-08(火) 13:50
     #7434-0RE#7430:カンマのPRINT匿名74342000-02-08(火) 14:56
     #7436-0RE#7434:カンマのPRINTKazu2000-02-08(火) 16:00
     #7437-0RE#7436:カンマのPRINTぜんちゃん2000-02-08(火) 16:07
     #7442-0RE#7437:カンマのPRINTKazu2000-02-08(火) 17:07
#7430-0
カンマのPRINT
print命令でカンマがあると(数値)、改行されます。

print #1,Str,tab(20);

Str に数値で123,456と入っていると
123
456
とプリントされます。
それで、write #1,str,space(10);
のようにすればいけるんですが、tabが使えなくてちょっと不便です。

よい方法がありましたら教えて下さい。
#7434-0
RE#7430:カンマのPRINT
> print命令でカンマがあると(数値)、改行されます。
> 
> print #1,Str,tab(20);
> 
> Str に数値で123,456と入っていると
> 123
> 456
> とプリントされます。

  StrはString型ですよね?
  私の方では改行などされずに
  123,456
  と書き込まれましたよ。

  Dim strHoge   As Variant

  Open "d:\wk\test.txt" For Output As #1
  strHoge = "123,456"

 Print #1, strHoge, Tab(20);

 Close #1

   # Strは、VBに関数として存在しているので
   # このような変数名をつけるのは、やめましょう。
#7436-0
RE#7434:カンマのPRINT
ファイルから読み込んだ時に改行されるようです。
  レコードの区切とみなしているんじゃないでしょうか

下記のtest.txtには、123,456 が入っています。
Dim str1 As String
Open "c:\tmp\test.txt" For Input As #1
Open "c:\tmp\testout.txt" For Output As #2

Do While Not EOF(1)
    Input #1, str1
    Print #2, str1
Loop
Close #1
Close #2
#7437-0
RE#7436:カンマのPRINT
> ファイルから読み込んだ時に改行されるようです。
>   レコードの区切とみなしているんじゃないでしょうか
> 
> Do While Not EOF(1)
>     Input #1, str1
>     Print #2, str1
> Loop

Input を Line Input を使う方法ではどうですか?
#7442-0
RE#7437:カンマのPRINT
> > ファイルから読み込んだ時に改行されるようです。
> >   レコードの区切とみなしているんじゃないでしょうか
> > 
> > Do While Not EOF(1)
> >     Input #1, str1
> >     Print #2, str1
> > Loop
> 
> Input を Line Input を使う方法ではどうですか?

有り難うございました。
Line Input でうまくいきました。
このページと関連する記事:
#508-3テキストファイルを一気に読み込みたい。2003-12-05(金) 20:54
#21316-0ファイルオープン時に改行コードを自動認識させるには?2002-06-26(水) 19:35
#23847-0Line Input #について2001-10-20(土) 11:42
#21708-0バイナリファイルのコピー方法2001-07-05(木) 16:18
#20008-0リストボックスの読み込み2001-04-03(火) 18:59
#11058-0テキストファイルを読み込む2000-09-01(金) 17:12
#40587-0テキストファイルの文字列置換方法2001-03-21(水) 15:34
#20778-0メモ帳の保存や開くを再現するには?2001-05-09(水) 14:44
#23470-0行の読み込み,とばし方2001-10-01(月) 21:08
#47099-0CSVファイルの比較方法2001-09-21(金) 20:40
お探しの情報は見つかりましたか?お困りの問題は解決しましたか?
サイト内検索, 似た記事検索で見つからなくてもあきらめずに掲示板で質問してみましょう。
VB初心者友の会があなたのお役に立てれば幸いです。また、本ページの投稿者の方々にこの場を借りて感謝致します。
本ページは過去ログを集めて自動構成しています。よろしければこのページに関するフィードバックをお願いします。
(※ 構成の誤り、広告等の不適切な記事、リンク切れ、読めないページの報告など)