討論區快速選單
知識庫快速選單
政府補助!學嵌入式+物聯網 沒有人比Cloudera更了解大數據
[ 回上頁 ] [ 討論區發言規則 ]
如何讀取txt檔,並往下加入新的資料
更改我的閱讀文章字型大小
作者 : windowsdtr(瘋狂阿愷)
[ 貼文 4 | 人氣 0 | 評價 0 | 評價/貼文 0 | 送出評價 0 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
2016/9/5 下午 12:46:38
假設有四個text,其中text1與text2填入文字,
text3與text4填入頭、尾卡片序號(連號),用for迴圈偵測text3到text4共幾組號碼
並且想要讀取txt後在往下繼續新增資料
但是我變成每次都會覆蓋原本的資料,程式碼如下:

Open "C:\TT.txt" For Output As #1
Print #1, "姓名" & Text1.Text & " 玩具:" & Text2.Text


Print #1,
     For i = Text3.Text To Text4.Text
     Print #1, i
     Next
    
   MsgBox "儲存成功", 0 + 64, "完成"
    
   Close #1

假設現在我輸入:text1=bobo,text2=溜溜球,text3=100,text4=105
執行後txt打開會呈現如下:
>>>>>>以下>>>>>>>
訂購人:bobo 內容物:溜溜球
 100
 101
 102
 103
 104
 105
>>>>>>>以上>>>>>>>
我希望未來我再輸入text1=ADY,text2=籃球,text3=10,text4=15
可以變成
>>>>>>以下>>>>>>>
訂購人:bobo 內容物:溜溜球
 100
 101
 102
 103
 104
 105
訂購人:ADY 內容物:籃球
 10
 11
 12
 13
 14
 15
>>>>>>>以上>>>>>>>
現在小弟不懂如何先讀取原本資料後,在後面加上新的資料,接著再重新寫入txt
原本使用excel換列方式做處理檔案比較不會太長,但變成xls檔一樣整個檔案都會覆蓋掉....
作者 : qazujm(joe) Visual Basic卓越專家C#優秀好手貼文超過1000則
[ 貼文 1521 | 人氣 2524 | 評價 9070 | 評價/貼文 5.96 | 送出評價 90 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
2016/9/6 上午 09:39:01
VB6 檔案讀寫操作
http://webhd01.blogspot.tw/2009/08/vb6.html
Open "C:\TT.txt" For Append As #1
 板主 : 小樓
 > Visual Basic 6.0/VBA - 討論區
 - 最近熱門問答精華集
 - 全部歷史問答精華集
 - Visual Basic 6.0/VBA - 知識庫
  ■ 全站最新Post列表
  ■ 我的文章收藏
  ■ 我最愛的作者
  ■ 全站文章收藏排行榜
  ■ 全站最愛作者排行榜
  ■  月熱門主題
  ■  季熱門主題
  ■  熱門主題Top 20
  ■  本區Post排行榜
  ■  本區評價排行榜
  ■  全站專家名人榜
  ■  全站Post排行榜
  ■  全站評價排行榜
  ■  全站人氣排行榜
 請輸入關鍵字 
  開始搜尋
 
Top 10
評價排行
Visual Basic 6.0/VBA
1 阿戊 10670 
2 小樓 8650 
3 Jones 5270 
4 水瓶天賞 2340 
5 joe 2230 
6 史努比 1950 
7 阿呆紅 1440 
8 tt's 1250 
9 青衫 1150 
10 羅啟章 1020 
Visual Basic 6.0/VBA
  專家等級 評價  
  一代宗師 10000  
  曠世奇才 5000  
  頂尖高手 3000  
  卓越專家 1500  
  優秀好手 750  
Microsoft Internet Explorer 6.0. Screen 1024x768 pixel. High Color (16 bit).
2000-2018 程式設計俱樂部 http://www.programmer-club.com.tw/
0.125