作者winstonlim (wayne)
看板Visual_Basic
標題[VB6 ] 如何將多項檔案儲存於一資料檔內
時間Sat May 20 06:27:28 2006
請問各位大大
如何將兩筆以上的檔案儲存於一個資料夾，
並判斷對方已經儲存置檔案內，
將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