vb.net自动保存 vb保存数据到指定的excel

vb.net 调试 保存 刚从vb6.0转战到vb.net 发现.net运行调试后，代码就自动保存了。能否取消自动保存？

准备VB6.0源代码

创新互联公司为您提适合企业的网站设计 让您的网站在搜索引擎具有高度排名，让您的网站具备超强的网络竞争力！结合企业自身，进行网站设计及把握，最后结合企业文化和具体宗旨等，才能创作出一份性化解决方案。从网站策划到网站设计、网站制作， 我们的网页设计师为您提供的解决方案。

1

打开visual basic 6.0编程工具，制作一个简单的小程序。在界面中增加一个按钮；一个文本框，在点击按钮后，会弹出对话框。

2

生成运行程序进行测试。

3

点击按钮，可以看到弹出的对话框和文本框中显示的字符串。

4

将测试程序保存到桌面的一个测试文件夹。

END

将VB6.0源代码转换为VB.NET

打开Microsoft visual studio 2008。

打开刚才保存的vb6.0项目。

会弹出升级向导，按照默认选项进行升级。

等待几十秒后，升级成功。

可以在vs编程工具中看到转换为vb.net的源代码.

在刚才的VB6.0源代码文件夹中会看到新增一个[project1.net]的文件夹。

文件夹中就是转换为vb.net的源代码文件，已经成功将VB6.0转换为VB.net。

求VB.NET写的自动保存txt文档的代码

直接给你保存和读取TXT的VB.NET的函数代码，你只要在触发事件中调用就可以了，注意换行，有的是显示不下去才显示两行的，还有strFilePath代表文件路径，TempENG代表文件编码格式如：UTF-8或者GB2312，strText 代表内容字符串。

#Region "读取TXT"

Public Function ReadTxt(ByVal strFilePath As String, ByVal TempENG As String) As String

Dim mySr As System.IO.StreamReader

Dim strS As String

Dim n%

strS = ""

mySr = New System.IO.StreamReader(strFilePath, System.Text.Encoding.GetEncoding(TempENG))

Do

Dim line$ = mySr.ReadLine()

strS = strS line vbCrLf

n = n + 1

Loop Until mySr.EndOfStream = True

mySr.Close()

Return strS

End Function

#End Region

#Region "保存TXT"

Public Function SaveTxt(ByVal strFilePath As String, ByVal strText As String, ByVal TempENG As String) As Boolean

Try

If Dir(strFilePath) "" Then File.Delete(strFilePath)

Dim mySw As System.IO.StreamWriter

Dim strLine() As String

mySw = New System.IO.StreamWriter(strFilePath, True, System.Text.Encoding.GetEncoding(TempENG))

strLine = Split(strText, vbCrLf)

For i As Integer = 0 To UBound(strLine)

mySw.WriteLine(strLine(i))

Next

mySw.Close()

Return True

Catch ex As Exception

Return False

End Try

End Function

#End Region

vb.net webbrowser 自动保存文件到指定文件夹

老实说不一定要webBrowser，这是Windows下载文件界面啊，不是VB.Net画出来的。

真的是做下载文件，WebClient.DownloadFile方法就足够了，调用方法后会自动弹出Windows下载任务窗口。

在VS.NET里也提供了一个com接口，可以直接调用迅雷的dll，下载文件可以让你自由选择是用迅雷下载还是通过Windows下载任务来执行下载。

webBroser下载文件

FileInfo file = new System.IO.FileInfo(Server.MapPath(path));

if (File.Exists(Server.MapPath(path)))

{

string name = Path.GetFileName(Server.MapPath(path));

//存在文件

Response.Clear();

Response.Buffer = false;

//通知浏览器下载文件而不是打开 

Response.ContentType = "application/octet-stream";

//下载的文件名

Response.AppendHeader("content-disposition", "attachment;filename=" + name);

//文件的大小

Response.AppendHeader("Content-Length",   file.Length.ToString());

Response.WriteFile(path);

}

介绍一个更简单的方法给你，从webbrowser获取点击的超连接，然后自由选择下载，先在引用里引用com组件

然后在点击事件中加代码

string url = webBrowser1.Document.Links[1].GetAttribute("href");

ThunderAgentLib.AgentClass agent = new  ThunderAgentLib.AgentClass();//创建对象 

agent.AddTask(url, "默认保存文件名", "C:\\默认路径", "", "", 1, 0, 5);

agent.CommitTasks2(1);//提交

我用的是C#代码，VB.NET大同小异