開かれたファイルを使用してvb.netのファイルダイアログを保存する

Question

開いたファイルダイアログでファイルを選択すると、この操作はどのように処理できますか？たとえば、ユーザーが.txtファイルを選択して開いた場合、ファイルからデータを取得するにはどうすればよいですか？ユーザーがファイルを見つけたパスをどのように戻すことができますか？それでは、どのようにしてファイルを保存できますか？

私はOpenFileDialog.OpenFile（）メソッドがあることを知っていますが、私はこれが私が探しているものではないことを確信しています。私はToObjectメソッドも試しましたが、何とかしてしまったようです。

たとえば、画像をすばやく簡単に開く方法はありますか？

ありがとうございました！

これはVB.netにあります。

Answer 1

Dim dlg_open As New OpenFileDialog() 
If (dlg_open.Show() <> DialogResult.OK) Then Return 

'if a textfile, then 
Dim content As String() = IO.File.ReadAllLines(dlg_open.FileName) 

'if an image, then 
Dim img As New Bitmap(dlg_open.FileName) 

あなたは... IOに関係するすべての操作の周りのcatchブロックを試して置く必要があり、あなたはすべての例外を防ぐことはできません。

Answer 2

これは良い例です：https://web.archive.org/web/1/http://blogs.techrepublic%2ecom%2ecom/programming-and-development/?p=481です。

これは、わずかな時間でGoogleが回答できる簡単な質問です。あなたはFileOkイベントを処理したい

Answer 3

：

Private Sub OpenFileDialog1_FileOk(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles OpenFileDialog1.FileOk 
    Dim path As String = OpenFileDialog1.FileName 

    If fileIsBitmap Then 
     ' say the file is a bitmap image ' 
     Dim bmp As New Bitmap(path) 

     ' rotate the image 90 degrees ' 
     bmp.RotateFlip(RotateFlipType.Rotate90FlipNone) 

     ' save the image ' 
     bmp.Save(path) 

    ElseIf fileIsTextFile Then 
     ' or say the file is a text file ' 
     Dim fs As New IO.FileStream(path, IO.FileMode.Append) 
     Dim sr As New IO.StreamWriter(fs) 

     ' write a new line at the end of the file ' 
     sr.WriteLine("This is a new line.") 

     ' close the FileStream (this saves the file) ' 
     sr.Close() 
     fs.Close() 
    End If 
End Sub