當前位置:係統粉 > 電腦問答 > 其他問答 > VB 保存文件問題

VB 保存文件問題

提問者:zbkuang33  |  瀏覽 次  |  提問時間:2017-02-20  |  回答數量:9

VB 保存文件問題 在VB 中, 如何自動生成文件並且把文件自動保存到桌麵上? 我是在visual studio.net 2003 編寫代碼的.生成文件我隻會用richtextbox 這個控件,但是怎麼寫代碼讓文件自動保存到桌麵就不會了. x = System.Environment.GetFolderPath(System.Environment.SpecialFolder.DesktopDirectory) & x & \".txt\"RichTextBox1.SaveFile(x, RichTextBoxStreamType.PlainText)這個代碼隻能保存到Documents and Settings 這個文件夾裏的. 請問應該如何寫才能保存到桌麵上呢?

已有9條答案
12580zcz

12580zcz

回答數:172  |  被采納數:6

2017-02-20 17:33:22
從注冊表中找到桌麵的路徑
讚 17
南朝的章魚

南朝的章魚

回答數:203  |  被采納數:14

2017-02-20 19:50:14
但是代碼應該怎麼寫呢?
讚 20
龍之依然

龍之依然

回答數:111  |  被采納數:36

2017-02-20 21:36:12
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders
讚 11
君念花開_

君念花開_

回答數:170  |  被采納數:47

2017-02-21 02:41:14
不行.說什麼找不到路徑的.
讚 17
w3265968

w3265968

回答數:102  |  被采納數:27

2017-02-20 22:09:43
誰說找不到路徑??
(1)
讚 10
dr琉璃

dr琉璃

回答數:202  |  被采納數:84

2017-02-20 23:59:24
x = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders " & x & ".txt"
RichTextBox1.SaveFile(x, RichTextBoxStreamType.PlainText)

我的代碼是這樣寫,所以在桌麵上,沒有看到生成的文件, 然後程序運行時,它顯示所找不到路徑.
讚 20
雲中城的雲寶

雲中城的雲寶

回答數:54  |  被采納數:62

2017-02-21 09:15:23
暈,你不知道注冊表是什麼。用注冊表編輯器打開這個位置,裏麵所有文件夾的路徑都有,那個System.Environment.SpecialFolder.DesktopDirectory也是讀取這個位置
讚 5
baby銀牌

baby銀牌

回答數:23  |  被采納數:10

2017-02-21 11:58:58
懂得一點注冊表. 但是在這裏應該怎麼寫代碼才能讓文件直接保存到桌麵上?這個一點也不會. 所以才會這樣寫.
System.Environment.SpecialFolder.DesktopDirectory 用這個方法得到的保存路徑並沒有在桌麵上看見該文件的.
真的一點也會不會才會這樣寫的. [s:476]
讚 2
淩嘉的海角

淩嘉的海角

回答數:14  |  被采納數:138

2017-02-21 19:24:03
function DesktopDirectory() as String
Dim res As Microsoft.Win32.Registry
Dim reg As Microsoft.Win32.RegistryKey

reg = res.CurrentUser.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders", True)
Dim value as String
value= reg.GetValue("Desktop", "")
return value
end function
試試
讚 1
解決方法
版權信息

Copyright @ 2011 係統粉 版權聲明 最新發布內容 網站導航