VB.net实例

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

原文链接：http://zhidao.baidu.com/link?url=g2rWL-XFJ8DRD6aRPu5k8Ue8sIT4UNL6vBuXn4picx1RS-wEZDqN28xgSr-qfiDQ0YkPeyynzjQVdvw5nU32MggeHv6t5BCdeMgQEZl910i