ファイルの中身をすべて得たい

---

はじめて質問させていただきます。
ファイルの中身をすべて読んで、
それをStringか、もしくはバッファに格納したいのですが、
どうにもやり方がわかりません。
知っている方がいらっしゃいましたら教えてください。

編集    削除

---

もう過去ログにあるかもしれませんが、Openステートメントを使ってください。詳しくはヘルプ参照。

編集    削除

---

Dim inFno   As Long
Dim inFpath As String
Dim BytData() As Byte
Dim BytSize As Long
Dim Str     As String

inFpath = "該当ファイル"
inFno = FreeFile
Open inFpath For Binary Access Read As #inFno

BytSize = LOF(inFno) - 1
ReDim BytData(BytSize) As Byte
Get #inFno, , BytData()
Close #inFno
Str = StrConv(BytData(), vbUnicode)

----------------------------------------------------
＞それをStringか、もしくはバッファに格納したいのですが、
Stringというのが、VBのUNICODE型の文字列データを指していて、読み込み元がSjisのテキストファイルであるなばらこんな感じです。
単なるbyte配列として取り出したいだけなら最後の行はいりません。
（ByteData()にファイル内容が格納される。）

編集    削除

---

名前

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

本文

←解決時は質問者本人がここをチェックしてください。