セーブファイル

ファイルに

  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がないためオーバーロードの解決に失敗しました。というエラーが出てきますどうしたらよいですか？

ReadLineは，読み取った結果を戻り値として返します。
なので，

a = Reader.ReadLine()

Label1.Visible = CBool(Reader.ReadLine())

のようにする必要があります。

ありがとうございます。うまくいきました

１つ気になったのですが
読込時と書込み時のEncodingは同じにしておかなければ駄目です。
提示されたコードだと書込み時に省略されているのでShift-JISでは書かれないと思いますが、
大丈夫でしょうか？

再確認してみたら正しくは書きこめていたのですがファイルを開くときに間違って読み込んでしまうというエラーが発生してしまいました。
細かいところまで気を使ってくれてありがとうございました。