VB.NETでのファイル作成について

解決

北北 2003-08-06 00:30:47 No: 107968

VB.NETで...

＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊
Dim fileNo As Integer
Dim fileName As String = "Test.txt"

fileNo = FreeFile()
fileOpen(fileNo, fileName, OpenMode.Binary)
＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊

とすると、Test.txtファイルを作成するのですが、

＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊
Dim OpenFileDlg As New OpenFileDialog()
Dim fileNo As Integer
Dim fileName As String = "Test.txt"

OpenFileDlg.ShowDialog()
fileNo = FreeFile()
fileOpen(fileNo, fileName, OpenMode.Binary)
＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊

のように、OpenFileDialogコンポーネントを使用後では、ファイルが作成されません。
この理由が解らず、対処することが出来ません。
どなたか、対処法、理由をご存知の方いましたら、ご教授のほど宜しくお願いします。

北北 2003-08-06 02:03:09 No: 107969

解決しました。