いつもお世話になっております。
現在、VB.NETでメモ帳を作成しております。
メモ帳の機能で上書き保存をつけたいのですが、うまくいきません。
調べたところ、ファイルパスが必要そうだということはわかりました。
ファイルパスをどこから取得したら良いのかがわかりません。
また、上書き保存をクリックした時にファイルが存在すれば、そのまま保存。
存在しなければ、名前をつけて保存機能を出す。と、いうように判断したいです。
その判断はファイル名を検索を検索することで行うのでしょうか。
容量を得ていない質問かもしれませんが、よろしくお願い致します。
↓名前をつけて保存のソース
vb
1''' <summary> 2 ''' ファイル->名前をつけて保存をクリックしたら 3 ''' </summary> 4 Friend Sub mimNsave_Click() Handles mimNsave.Click 5 6 Dim sfd As New SaveFileDialog() 'SaveFileDialogの新しいインスタンスを作成 7 8 '初期表示するディレクトリを設定 9 sfd.InitialDirectory = "C:\" 10 11 'ファイルのフィルタ設定 12 sfd.Filter = "テキストファイル|*.txt;*.log|すべてのファイル|*.*" 13 14 'ファイルの種類の初期設定 15 sfd.FilterIndex = 2 16 17 '初期表示するファイル名の設定 18 sfd.FileName = "新しいファイル.txt" 19 20 'ダイアログを表示 保存するが選ばれたら 21 If sfd.ShowDialog() = Windows.Forms.DialogResult.OK Then 22 23 Dim stream As System.IO.Stream 'streamのインスタンスを作成 24 25 stream = sfd.OpenFile() 26 27 If Not (stream Is Nothing) Then 28 29 Dim sw As New System.IO.StreamWriter(stream) 30 31 'テキストエリアの内容を書き込み 32 sw.Write(txtArea.Text) 33 34 '閉じる 35 sw.Close() 36 stream.Close() 37 38 End If 39 40 End If 41 42 43 End Sub
回答2件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
2018/09/21 11:04
2018/09/25 00:25