Public Sub FileOpen( _
ByVal FileNumber As Integer, _
ByVal FileName As String, _
ByVal Mode As OpenMode, _
Optional ByVal Access As OpenAccess = OpenAccess.Default, _
Optional ByVal Share As OpenShare = OpenShare.Default, _
Optional ByVal RecordLength As Integer = -1 _
)

■OpenMode
Append：既存ファイルの後にデータを追加書込みする。
Binary：バイナリファイルモードで開く。
Input：既存ファイルからデータを読込む。
Output：新規ファイルを作成し、データを書込む。
Random：ランダムファイルモードで開く。

■OpenAccess
Default：読込み／書込み
Read：読込み専用
ReadWrite：読込み／書込み両用
ReadWrite：書込み専用

---