セーブファイル への返答

投稿で使用できる特殊コードの説明。(別タブで開きます。)
本名は入力しないようにしましょう。
投稿した後で削除するときに使うパスワードです。返答があった後は削除できません。
返答する人が目安にします。相手が小学生か社会人かで返答の仕方も変わります。
最初の投稿が質問の場合、質問者が解決時にチェックしてください。(以降も追加書き込み・返信は可能です。)
※「過去ログ」について書くときはその過去ログのURLも書いてください。

以下の返答は逆順(新しい順)に並んでいます。

投稿者 layton  (中学生) 投稿日時 2011/3/28 22:48:10
再確認してみたら正しくは書きこめていたのですがファイルを開くときに間違って読み込んでしまうというエラーが発生してしまいました。
細かいところまで気を使ってくれてありがとうございました。
0
投稿者 shu  (社会人) 投稿日時 2011/3/28 12:46:35
１つ気になったのですが
読込時と書込み時のEncodingは同じにしておかなければ駄目です。
提示されたコードだと書込み時に省略されているのでShift-JISでは書かれないと思いますが、
大丈夫でしょうか？
0
投稿者 layton  (中学生) 投稿日時 2011/3/28 12:20:34
ありがとうございます。うまくいきました
0
投稿者 YuO  (社会人) 投稿日時 2011/3/28 11:31:14
ReadLineは，読み取った結果を戻り値として返します。
なので，
a = Reader.ReadLine()

Label1.Visible = CBool(Reader.ReadLine())
のようにする必要があります。
0
投稿者 layton  (中学生) 投稿日時 2011/3/28 11:24:18
ファイルに
  Dim Witer As New IO.StreamWriter("save.txt")

  Witer.WriteLine(a)

  Witer.WriteLine(Label1.Visible)

  Witer.Close()

のように変数とプロパティを保存したのですが
　Dim Reader As New IO.StreamReader("save.txt", System.Text.Encoding.GetEncoding("Shift-JIS"))

  Reader.ReadLine(a)

  Reader.ReadLine(Label1.Visible)

  Reader.Close()

とするとこの引数の数を受けるReadLineがないためオーバーロードの解決に失敗しました。というエラーが出てきますどうしたらよいですか？
0