当前位置:系统粉 > 电脑问答 > 其他问答 > 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 系统粉 版权声明 最新发布内容 网站导航