關於VB儲存資料,vb 如何儲存輸入的資料

時間 2023-02-12 16:00:05

1樓:匿名使用者

下面是一個用隨機方法讀寫檔案的**,資料只能寫到檔案裡,不能直接寫到資料夾裡的-_-#

窗體上需要一個textbox

option explicit

private sub writedata() 寫資料。

dim filenum as integer

filenum = freefile()

open "d:\"for random as #filenum

put #filenum, 1, "這是個測試"

close #filenum

end sub

private sub readdata()

dim filenum as integer, myrecord as string

filenum = freefile()

open "d:\"for random as #filenum

seek #filenum, 1

get #filenum, 1, myrecord

= str(myrecord)

close #filenum

end sub

private sub form_load()

writedata

readdata

end sub

2樓:匿名使用者

那還是使用io操作吧,然後md5加密一下即可。

vb 如何儲存輸入的資料

3樓:匿名使用者

很容易啊,你設計兩個按鈕,點選儲存時,按順序將這十個text的內容儲存到當前目錄裡的指定檔案裡,然後點恢復時,從這個指定檔案時讀出,然後恢復到十個text裡就行了。

讀寫檔案的**很容易,這裡不用寫了吧。

4樓:du瓶邪

如您在文字框中輸入一個回車表示您輸入完畢儲存資料:

private sub text1_keypress(keyascii as integer)

if keyascii = 13 then '輸入了回車。

rs!姓名 = text1

end if

end sub

vb中怎樣儲存資料(儲存在vb資料庫裡)?

5樓:匿名使用者

方法一:在資料庫中建一個表,把當前最後的輸入值儲存在該表裡,,每次執行程式都從資料庫裡讀取,方法二:在程式中建一個文字檔案或xml檔案,每次都寫入檔案中,下次從檔案中讀取。

方法三:把輸入值存入登錄檔的某個位置,下次從登錄檔裡讀取!

6樓:網友

set fs=createobject(""建立檔案操作物件。

if "c:\"then'如果c盤存在,那麼讀取其內容。

set txt="c:\"forreading,true)

set txtn=

else'如果不是。

set txtf="c:\"true)'建立c盤下的。

do'無限迴圈(不用擔心他一直迴圈,關了就沒了)

1000'延時一秒。

'寫入文字框中內容。

loop'迴圈結束。

end if'判斷結束。

注意啦!以上**未經過測試!只是一個思路。

7樓:匿名使用者

1.使用檔案來記錄,下次執行時讀取 .2.使用資料庫,可以考慮單機資料庫或網路資料庫 3.如果資料量小,使用登錄檔。

或者可以通過程式來儲存:

set fs=createobject(""建立檔案操作物件。

if "c:\"then'如果c盤存在,那麼讀取其內容。

set txt="c:\"forreading,true)

set txtn=

else'set txtf="c:\"true)'建立c盤下的。

do'無限迴圈。

1000'延時一秒。

'寫入文字框中內容。

loop'迴圈結束。

end if'判斷結束。

如何將vb中輸入的資料自動儲存在資料庫中

在vb中新增資料,怎麼樣儲存到資料庫中

8樓:匿名使用者

這個有點複雜,但一與資料庫建立好連線,那就簡單多了,就那幾條**,你先建立好連線嘍。

vb中用什麼來儲存資料

9樓:匿名使用者

一、如果是程式關閉後資料還要留待以後使用的話,最簡單的莫過於使用txt檔案。如果資料有複雜的記錄和結構,建議使用資料庫。如果資料很少,且樣式多樣,可以。

用VB如何讀取txt的資料到text控制元件中?

這個算不得難,但不容易說明白。要對照這具體的目標文字才好搞。vb中text裡面的資料怎麼讀出 假定文字框是text1 dim s as string,i as integer,n as double s split for i 0 to ubound s print 第 i 1 個數是 s i n ...

Oracle儲存過程,更新大量資料,如何迴圈分批次提交

再多oracle也處理得了,即使是百萬千萬級別,再多就不適合用更新做法,思路就要換了 如果你非要這麼弄的話,通過rowid和rownum來做迴圈,但是意義不大 末日高督 你想多了.此類的更新 就應該是 update student set age age 1 where classid classi...

如何用VB連線SQL2019資料庫?急求

set conn new adodb.connection 採用的是無源的資料庫連線方法 conn.connectionstring driver server 172.16.203.215 uid sa pwd database dbname conn.connectiontimeout 30co...