vb怎樣打開桌面的123.txt,前輩們,求教

uj5u.com熱心網友回復:
Private Sub Command1_Click()
AA = "123456"
Open "C:\Users\Administrator\Desktop\123.txt" For Output As #1
Write #1, AA
Close #1
'在桌面創建123.txt檔案,C:\Users\Administrator\Desktop\是W7的桌面路徑,如果檔案不存在,Output方法可以創建檔案
End Sub
Private Sub Command2_Click()
Open "C:\Users\Administrator\Desktop\123.txt" For Input As #1
Input #1, BB
Close #1
'Input方法是讀取檔案內容
End Sub
uj5u.com熱心網友回復:
首先在工程的參考中選中Windows Scripting Host Object Modelbutton代碼里這么寫
Dim desk As New WshShell
s=desk.SpecialFolders("desktop")
Open s&"\123.txt" For Input As #1
Input #1, 你要輸入txt的內容
Close #1
這樣就可以了
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/79597.html
標籤:非技術類
上一篇:activereport VB 6.0 如何控制行數進行分頁,請教大神!!急!!
下一篇:VB中datagrid資料顯示
