VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日： 2006/08/30(Wed) 15:51
投稿者： もな
Ｅメール：
ＵＲＬ：
タイトル： 外部ファイルの操作

お世話になっております。
改めて質問をさせていただきます。

vb　6.0でテキストボックスに入力した値を
外部ファイル（*.txt)にボタンクリックで入力し
そのあと別のボタンクリックで外部ファイルに入力された値を消すという
プログラムを作っています。

入力のプログラムは

Private Sub btn_Run_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_Run.Click
        'エラーで処理を中断しないように設定
        On Error Resume Next

        'ファイル番号変更用変数宣言
        Dim intFileNum As Integer

        '空いているファイル番号を取得
        intFileNum = FreeFile()

        'ファイル番号にファイルを割り当てて書き込みで開く
        FileOpen(intFileNum, "C:\VB\Date.txt", OpenMode.Append)

        'エラーが発生していた場合は処理を中断
        If (Err.Number <> 0) Then
            MsgBox("ファイルが開けませんでした")
            Exit Sub
        End If

        Dim strLine As String

        '時刻を書き込む
        Print(intFileNum, Now() & vbCrLf)

        'ファイルを閉じる
        FileClose(intFileNum)
    End Sub

という形で作成しましたが次の入力された値を消すという作業にいきつけません。

kill(ファイルの場所）
という関数を使ったら
ファイルごと消えてしまいました。

なにかヒントなどをいただけたら幸いです。
よろしくおねがいします。

- 関連一覧ツリー （★ をクリックするとツリー全体を一括表示します）
- 返信フォーム （この記事に返信する場合は下記フォームから投稿して下さい）

- VBレスキュー(花ちゃん) - - Web Forum -