OKWAVEのAI「あい」が美容・健康の悩みに最適な回答をご提案!
-PR-
解決
済み

表示プログラムについて

  • 困ってます
  • 質問No.167301
  • 閲覧数31
  • ありがとう数1
  • 気になる数0
  • 回答数1
  • コメント数0

お礼率 46% (128/273)

テキストの中の”あいうえお”のような文章を表示させるプログラムを作りたいんですが
Private Sub Command1_Click()
Open "c:\mydata\test.txt" For Input As #1
End Sub

Private Sub Command2_Click()
Close #1
End Sub
では表示されませんでした。何がおかしいかとかどうすればいいか教えてください。お願いします。
通報する
  • 回答数1
  • 気になる
    質問をブックマークします。
    マイページでまとめて確認できます。

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

  • 回答No.1
レベル12

ベストアンサー率 65% (276/422)

テキストを開いているのですが、値を取得しないで閉じてます。
取得するようにしましょう。

Private Sub Command1_Click()
  Dim strWork As String

  'テキストを開く
  Open "c:\mydata\test.txt" For Input As #1

    '1行取得
    Line Input #1, strWork
  
  'テキストを閉じる
  Close #1
  
  MsgBox strWork
End Sub
お礼コメント
mos21

お礼率 46% (128/273)

丁寧なそしてお早い回答ありがとうございました。値を取得しないで閉じていたんですね、ありがとうございます。
投稿日時 - 2001-11-13 01:39:36
-PR-
-PR-
このQ&Aのテーマ
このQ&Aで解決しましたか?
関連するQ&A
-PR-
-PR-
こんな書き方もあるよ!この情報は知ってる?あなたの知識を教えて!
このQ&Aにはまだコメントがありません。
あなたの思ったこと、知っていることをここにコメントしてみましょう。

その他の関連するQ&A、テーマをキーワードで探す

キーワードでQ&A、テーマを検索する
-PR-
-PR-
-PR-

特集


いま みんなが気になるQ&A

関連するQ&A

-PR-

ピックアップ

-PR-
ページ先頭へ