已解決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

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

從注冊表中找到桌麵的路徑

2017-02-20 17:33:22

讚 17

南朝的章魚

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

但是代碼應該怎麼寫呢?

2017-02-20 19:50:14

讚 20

龍之依然

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

HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders

2017-02-20 21:36:12

讚 11

君念花開_

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

不行.說什麼找不到路徑的.

2017-02-21 02:41:14

讚 17

w3265968

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

誰說找不到路徑？？

2017-02-20 22:09:43

讚 10

dr琉璃

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

x = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders " & x & ".txt"
RichTextBox1.SaveFile(x, RichTextBoxStreamType.PlainText)

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

2017-02-20 23:59:24

讚 20

雲中城的雲寶

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

暈，你不知道注冊表是什麼。用注冊表編輯器打開這個位置，裏麵所有文件夾的路徑都有，那個System.Environment.SpecialFolder.DesktopDirectory也是讀取這個位置

2017-02-21 09:15:23

讚 5

baby銀牌

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

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

2017-02-21 11:58:58

讚 2

淩嘉的海角

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

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
試試

2017-02-21 19:24:03

讚 1