ファイルをバイナリで読み込むには？？ (ID:116416)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 TextBox1にダイアログから指定して読み込んで、ボタンを押すと出力するようにしたんですけれども、長い文章のテキストだとエラーがでてしまうんですが・・・ Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 'Base64でバイト型配列に戻す文字列 Dim s As String = TextBox1.Text 'バイト型配列に戻す Dim bs() As Byte = System.Convert.FromBase64String(s) 'ファイルに保存する '保存するファイル名 Dim outFileName As String = "d:\h.txt" 'ファイルに書き込む Dim outFile As New System.IO.FileStream(outFileName, System.IO.FileMode.Create, System.IO.FileAccess.Write) outFile.Write(bs, 0, bs.Length) outFile.Close() MsgBox("ok") End Sub