[VB6 ] 如何將多項檔案儲存於一資料檔內

看板Visual_Basic作者 (wayne)時間19年前 (2006/05/20 06:10), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串1/2 (看更多)
請問各位大大 如何將兩筆以上的檔案儲存於一個資料夾, 並判斷對方已經儲存置檔案內, 將g_savecom儲存的資料放置資料檔內的頂端, 將f_savecom儲存的資料放置資料檔內的後端. 但如果先儲存f_savecom時是否能將資料放置後端. 感恩了 Private Sub g_savecom_Click() Dim filename As String 'On Error GoTo fin filename = App.Path & "\g.dat" If g_adglist.ListCount = 0 Then Exit Sub Open filename For Output As #1 For I = 0 To g_adglist.ListCount - 1 Print #1, g_adglist.List(I) Next Close #1 End Sub Private Sub f_savecom_Click() Dim f_file As String Dim f_move As String Dim f_color As String Dim filename As String filename = App.Path & "\g.dat" Open filename For Output As #1 f_file = f_labfl.Caption f_move = f_motext.Text f_color = f_col Print #1, "f_axis" Print #1, f_file & "," & f_move & "," & f_color Close (1) End Sub 麻煩各位大大了...謝謝 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.127.118.206
文章代碼(AID): #14Ra9T85 (Visual_Basic)
文章代碼(AID): #14Ra9T85 (Visual_Basic)