/// 実習F1の2 ファイル処理 | プログラミング実習 |
プロジェクト名 (実習F1テキストファイルの読み書き)
説明
追加書き込みの処理(追記)を追加する。
デザイン
フォームのプロパティ
Text = 実習F1テキストファイルの読み書き2
チェックボックス cbTsuiki
Text = 追記
コード(プログラム) 変更部分のみ
Private Sub btnFWrite_Click(sender As System.Object, e As System.EventArgs)
Handles btnFWrite.Click
If cbTsuiki. @ = True Then
My.Computer.FileSystem.WriteAllText(tbxFName.Text, tbxData.Text,
A )
Else
My.Computer.FileSystem.WriteAllText(tbxFName.Text, tbxData.Text,
B )
End If
End Sub
キーワード
解説
[追記]にチェックがあれば(cbTsuiki.Checked=True)、追加書き込みとなる。
My.Computer.FileSystem.WriteAllText(ファイル名, データ, True)
[追記]にチェックがなければ、上書きとなる。
My.Computer.FileSystem.WriteAllText(ファイル名, データ, False)
テスト
□ [クリア]、tbxDataに入力1、[書き込み]、[クリア]、tbxDataに入力2、[書き込み]、[クリア]、[読み込み] ⇒ 入力2が読み込まれる。
□ [追記]にチェック、[クリア]、tbxDataに入力1、[書き込み]、[クリア]、[読み込み] ⇒ 入力2と入力1の内容が読み込まれる。
/// 実習F1の2 ファイル処理 | Copyright©2014 Hiroshi Masuda |