討論區快速選單
知識庫快速選單
政府補助!學嵌入式+物聯網 討論區最近新進100則主題 軟體開發過程中有哪些資安漏洞?
[ 回上頁 ] [ 討論區發言規則 ]
如何記錄當次修改過的textbox並在下次執行時記得最後的修改.
更改我的閱讀文章字型大小
作者 : mrxyz(mrxyz)
[ 貼文 5 | 人氣 0 | 評價 0 | 評價/貼文 0 | 送出評價 2 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
2012/2/8 下午 03:56:43
各位大大好!
已經花了一些時間搜尋相關問題!
但都只有看到寫入單一text的程式
沒有判斷內容並填入多個textbox內
我的目的是要記錄當次修改過的textbox
在下次開啟程式時會記得上一次的輸入資料
謝謝!
作者 : 57805137(水瓶天賞) Visual Basic卓越專家貼文超過500則
[ 貼文 698 | 人氣 4505 | 評價 2720 | 評價/貼文 3.9 | 送出評價 2 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
2012/2/9 上午 12:00:36
非常基本當然找不到
最簡單的作法,就是結束程式,把TEXT的內容存成TXT
表單LOAD時 在取出顯示
作者 : mrxyz(mrxyz)
[ 貼文 5 | 人氣 0 | 評價 0 | 評價/貼文 0 | 送出評價 2 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
2012/2/9 上午 08:27:52
不好意思!因為初學vb所以基本的也不太會!
這是我找的資訊修改的


Private Sub Command1_Click()

Open "1.txt" For Output As #1
    Print #1, Text1.Text
    Close #1

End Sub

Private Sub Form_Load()

Open "1.txt" For Input As #1
Input #1, X
Text1.Text = X
Close

End Sub

如果我有多個textbox那要怎麼做才可以紀錄多筆呢?

謝謝!
作者 : qazujm(joe) Visual Basic卓越專家C#優秀好手貼文超過1000則
[ 貼文 1521 | 人氣 2524 | 評價 9070 | 評價/貼文 5.96 | 送出評價 90 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
主題發起人mrxyz註記此篇回應為最佳解答 2012/2/9 下午 12:51:01
Private Sub Command1_Click()

    Dim i As Integer
    
    Open "1.txt" For Output As #1
    
    For i = 0 To 2
     Print #1, Text1(i).Text
    Next
    
    Close #1

End Sub

Private Sub Form_Load()

    Dim i As Integer

    Open "1.txt" For Input As #1
    
    For i = 0 To 2
     Input #1, X
     Text1(i).Text = X
    Next
    
    Close

End Sub
作者 : mrxyz(mrxyz)
[ 貼文 5 | 人氣 0 | 評價 0 | 評價/貼文 0 | 送出評價 2 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
2012/2/9 下午 05:15:39

>Private Sub Command1_Click()
>
> Dim i As Integer
>
> Open '1.txt' For Output As #1
>
> For i = 0 To 2
> Print #1, Text1(i).Text
> Next
>
> Close #1
>
>End Sub
>
>Private Sub Form_Load()
>
> Dim i As Integer
>
> Open '1.txt' For Input As #1
>
> For i = 0 To 2
> Input #1, X
> Text1(i).Text = X
> Next
>
> Close
>
>End Sub
>

太感謝了!
測試了一下可以正常work
不過要先建立1.TXT
可以再請問一下裡面的X是什麼
還有是用什麼原理做換行讀取?
謝謝!
作者 : qazujm(joe) Visual Basic卓越專家C#優秀好手貼文超過1000則
[ 貼文 1521 | 人氣 2524 | 評價 9070 | 評價/貼文 5.96 | 送出評價 90 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
2012/2/9 下午 06:15:09
Line Input # 陳述式
http://yes.nctu.edu.tw/vb/1_stat/lineinput.htm

Input # 陳述式
    

從已開啟的循序檔中讀取資料,並將資料指定給變數。

語法

Input #filenumber, varlist

Input # 陳述式的語法具有以下幾個單元:

單元 說明
filenumber 必要的引數。任何正確的檔案代碼。
varlist 必要的引數。以逗號分隔的數個變數,從檔案中讀入的資料將會依序放入這些變數之內。上述的變數不可以是一個陣列或是物件變數,不過可以是一個描述陣列元件的變數或是一個使用者自訂型態的變數。


請注意

使用 Input # 陳述式來讀取資料時,則通常會以 Write # 陳述式來寫入資料。Input # 陳述式僅能使用於以 Input 或 Binary 模式開啟的檔案。

在讀取資料時,標準的字串或數值資料會直接指定給變數,不會做任何轉換。下表說明如何處理其它型態的輸入資料:

資料 指定給變數的值
分隔逗號或空白列 Empty
#NULL# Null
#TRUE# or #FALSE# True 或 False
#yyyy-mm-dd hh:mm:ss# 以運算式所表示的日期和時間。
#ERROR errornumber# errornumber(此變數是一個 Variant,用來標示出錯誤)


輸入資料中的雙引號符號(" ")將會被忽略。

檔案中資料項目的順序必須與 varlist 中的變數順序相同,而且其相對變數的資料型態必須符合。如果所指定的變數屬於數字型態,而檔案中的資料不是數值型態,則此變數的值會被指定為零。

在讀取資料項目時,如果已經到達檔案的尾端,則會停止讀取資料,並且會產生一個錯誤。

附註 為了使 Input # 陳述式能正確地將檔案的資料讀入變數中, 則在將資料寫入檔案時,一般會使用 Write # 陳述式來代替 Print # 陳述式。使用 Write # 陳述式可確保個別的資料欄位被正確地隔開。
 板主 : 小樓
 > 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-2019 程式設計俱樂部 http://www.programmer-club.com.tw/
0.140625