189 8069 5689
Imports System
创新互联专注于南漳网站建设服务及定制，我们拥有丰富的企业做网站经验。 热诚为您提供南漳营销型网站建设，南漳网站制作、南漳网页设计、南漳网站官网定制、小程序制作服务，打造南漳网络公司原创品牌,更为您提供南漳网站排名全网营销落地服务。
Imports System.Threading
Public Class Form1
Dim TestThread1, TestThread2 As Thread
Public Sub TestMethod1()
Dim i As Integer
i = 0
While (i 1000)
Label1.Text = i
i += 1
End While
End Sub
Public Sub TestMethod2()
Dim i As Integer
i = 0
While (i 1000)
Label2.Text = i
i += 1
End While
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Control.CheckForIllegalCrossThreadCalls = False
TestThread1 = New Thread(New ThreadStart(AddressOf TestMethod1))
TestThread1.Start()
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Control.CheckForIllegalCrossThreadCalls = False
TestThread2 = New Thread(New ThreadStart(AddressOf TestMethod2))
TestThread2.Start()
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Control.CheckForIllegalCrossThreadCalls = False
TestThread1 = New Thread(New ThreadStart(AddressOf TestMethod1))
TestThread2 = New Thread(New ThreadStart(AddressOf TestMethod2))
TestThread1.Start()
TestThread2.Start()
End Sub
End Class
1 生成txt文件。
DimSaveFileDialog1AsNewSaveFileDialog() '创建一个保存对话框
SaveFileDialog1.Filter ="txt files (*.txt)|*.txt" '设置扩展名
IfSaveFileDialog1.ShowDialog() = System.Windows.Forms.DialogResult.OKThen '如果确定保存
My.Computer.FileSystem.WriteAllText(SaveFileDialog1.Filename, Textbox1.Text,False) '保存文本,False表示不追加文本，直接覆盖其内容
EndIf
原文链接：
Visual Basic .NET Visual Basic.NET是基于微软.NET Framework之上的面向对象的中间解释性语言，可以看作是Visual Basic在.Net Framework平台上的升级版本,增强了对面向对象的支持。但由于改动太大，导致VB.net对VB的向后兼容性不好，在业界引起不小的争议。 大多的VB.Net程序员使用Visual Studio .Net作为IDE（integrated development environment). SharpDevelop是另一种可用的开源的IDE。VB.Net需要在.Net Framework平台上才能执行。 VB.NET的主页 1 目前版本 2005年9月以来，存在三种不同版本的Visual Basic .NET. 1 Visual Basic .NET:是随vc#和ASP.NET一起在2002年发布的最初始的VB.net版本。C#被大力宣传为微软对付JAVA的王牌，受到媒体极力关注。然而VB.NET(有时被称为VB7)影响面不广，这导致VB社区之外很少人关注它。那些试用过此版VB.NET的人在层层幕布下发现一个强大却艰深的语言，而且还有不少弱点，比如它比VB6来有一个大了十倍的进行时(RunTime)，内存footprint也大大增加。 2 Visual Basic .NET 2003:是和.NET Framework 1.1一起发布的。新功能包括对.NET Compact Framework的支持和更好的VB升迁向导。并改进了运行状况，IDE稳定性(尤其是后台编译器)，以及运行时RunTime稳定性。另外，VB.NET 2003还有一个学院版Visual Studio .NET 2003 Academic Edition (VS03AE)，它是分发给各国某些学者免费使用的版本。 3 Visual Basic 2005:VB2005是VB.Net的重大转变，微软决意在其软件名称中去掉了.NET部份。在VB2005中，微软增加了许多新功能，以引用VB对于初学者来说的一些优点： A, Edit and Continue - 也许是从VB那里丢掉的最大的功能，允许代码的编辑和执行立即的执行恢复。 B, Design-time expression evaluation C, My伪命名空间，提供了访问.NET Framework特定域的不需大量编码的简单方式；还能动态产生类(显然的是My.Forms)；提供了改进的VB到VB.NET转换向导；Using 语法，简化了需要部署pattern to free resources的对象的使用；My编码，可隐藏由VB.NET IDE写的模板代码；数据源绑定，简化了数据库C/S开发 上述功能(尤其是My)增强了VB.Net成为快速开发应用平台的可能，并与C#进一步区别开来。参见： 使用My开发 通过My命名空间访问.NET Framework 和项目 Visual Basic 2005 通过增加新功能而填补了和其它所谓更强大的.NET语言的差距。 A, 增加了.NET 2.0语言功能包括：generics和Partial类(在一个文件里定义一个类的某部份然后再添加更多的定义，这个方法在整合用户编码和系统自动生成编码时尤其有用)。 B, XML注释，可以被NDoc等工具处理而自动生成文档 C, operator overloading D, 支持在其它语言中已经广泛使用的unsigned integer数据类型。 E, 支持在许多C衍生编程语言已提供的复合操作符如："+=", "-=" 4, IsNot专利：If Not X Is Y表达式被转换成If X IsNot Y。当微软为IsNot申请专利时招致了恶名(尤其来自Real公司)。 5, Visual Basic 2005 Express：作为VS产品线上的一部份,VB2005 Express是专为业余爱好者和新手定制的免费的VS Express系列的一员。Express版本目的定位在帮助人们学习一种语言，所以他们有和标准版一致的用户界面，只是少了一些高级功能。另外，VS 查看更多答案
记得采纳啊