ファイル(*.txtのみ)を読み込んで、テキストボックスに中身を表示させておりますが、2回以上ファイルを読み込んだ時、テキストボックスに書かれた内容を消した上で、読み込んだファイルの中身を表示させるように変更できないでしょうか。また、テキストボックスに書かれた内容をクリアするボタンの作り方も知りたいです。
例、1.ABCと書かれたテキストの読み込み→ABC とテキストボックスに表示される
2.XYZと書かれたテキストの読み込み→ABC XYZ とテキストボックスに表示される
これを2.を読み込んだ時、ABCを表示せずにXYZと表示したい
コードの一部
Private Sub Command1_Click()
CommonDialog1.Filter = "テキスト(*.txt)|*.txt|すべて(*.*)|*.*"
CommonDialog1.FilterIndex = 1
CommonDialog1.Flags = cdlONFileMustExist '既存ファイルのみ読み込み
CommonDialog1.CancelError = True
On Error Resume Next
CommonDialog1.ShowOpen
If (Err = 0) Then
FileRead CommonDialog1.FileName
End If
On Error GoTo 0
End Sub
お礼
上の1行でばっちりでした。ありがとうございました。