VISUAL BASIC　OpenFileDialogコントロール

今回は、”VISUAL BASIC　OpenFileDialogコントロール”です。

よろしくお願いします。m(__)m
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
◆-Title-◆

１．★VISUAL BASIC　OpenFileDialogコントロール★

２．Follow me

３．参考URL

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
１．★VISUAL BASIC　OpenFileDialogコントロール★

今回はファイルをオープンして表示します
ボタンを押したらダイアログが開きます
ファイル選択してokを押すとダイアログで書いた処理が実行されます
パスを取得して表示します

ちなみに
Savefiledialogの時は間違えてしまいました
SaveFileDialog1の時も下のようにShowで開いて
SaveFileDialog1をダブルクリックしてFileNameでパスを取得してSystem.IO.StreamWriterで書き込みます
SaveFileDialog1をクリックして右下の格子を設定すれば使えます

 

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

‘ボタンがクリックしたらダイアログが表示されます

OpenFileDialog1.ShowDialog()
‘ SaveFileDialog1.ShowDialog()

End Sub

 

Private Sub OpenFileDialog1_FileOk(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles OpenFileDialog1.FileOk

‘okをクリックされたときに表示します
Dim filepath As String

filepath = OpenFileDialog1.FileName
‘filepath = SaveFileDialog1.FileName

TextBox2.Text = filepath

Dim sr As StreamReader = New StreamReader(filepath)

TextBox1.Text = sr.ReadToEnd
sr.Close()

‘savefileとして書き込むやり方↓
‘sw As New System.IO.StreamWriter(filepath, False, System.Text.Encoding.GetEncoding(“UTF-8”))

‘sw.WriteLine(Me.TextBox1.Text)

End Sub

‘ファイルビューアができました

２．Follow me

ホームページ : https://cgishop.net

kindle出版 : https://kdp.amazon.co.jp/ja_JP/bookshelf?ref_=kdp_KDPS_TN_bs

メルカリ : https://www.mercari.com/jp/u/206198780/

ベクター : https://www.vector.co.jp/vpack/browse/person/an034075.html

ヤフオク　　　：https://auctions.yahoo.co.jp/seller/cgishop

３．ソフトウェア　ブログURL

トップページ

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
☆エンディング☆
————————————————————————
今回は、”VISUAL BASIC　OpenFileDialogコントロール”でした。
今後も随時改定していきます

( ・_・)_且~~ 　ご視聴ありがとうございました。
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
◆利用サイト◆

ささら立ち絵
緑QN

✉dqn160317@gmail.com
🐤https://twitter.com/dqnww
🏠https://dqnww.tumblr.com/
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━