vb打開txt文件 vb怎么把數(shù)據(jù)保存到文件里?
vb怎么把數(shù)據(jù)保存到文件里?Private Sub cmdSave Click()“”另存為文本文件dim filenumberdim strouttmpfile as string”定義輸出文件的名
vb怎么把數(shù)據(jù)保存到文件里?
Private Sub cmdSave Click()
“”另存為文本文件
dim filenumber
dim strouttmpfile as string”定義輸出文件的名稱
dim strPrintTXT as string”定義輸出文件的內(nèi)容
strouttmpfile=應(yīng)用程序路徑& “mytxt.txt文件“
strPrinteTxt=text1.text& ”| “&;text2.text
打開”Error GoTo Err2
FileNumber=FreeFileOpen strouttmpfile for append as#FileNumber
print#FileNumber,strprintetxt
close#FileNumber
end sub
方法1:Open “C:1。TXT“輸出為#1”C:1#1“關(guān)閉文件
方法2:dim AA as stringaa=text1&;text2&Text3&。。。。。?!皩⒍鄠€(gè)文本框內(nèi)容合并到變量中
1。TXT
保存文件
打印#1,AA“寫入內(nèi)容
關(guān)閉#1”關(guān)閉文件