我的方法不知道是不是很苯.......
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim a As String
SaveFileDialog1.Filter = "abc|*.abc"
If SaveFileDialog1.ShowDialog = DialogResult.OK Then
a = SaveFileDialog1.FileName
Dim sw As System.IO.StreamWriter = New System.IO.StreamWriter(a)
sw.Write(TextBox1.Text)
sw.Write(TextBox2.Text)
sw.Close()
End If
End Sub
![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
![](/Images/OutliningIndicators/InBlock.gif)
![](/Images/OutliningIndicators/InBlock.gif)
![](/Images/OutliningIndicators/InBlock.gif)
![](/Images/OutliningIndicators/InBlock.gif)
![](/Images/OutliningIndicators/InBlock.gif)
![](/Images/OutliningIndicators/InBlock.gif)
![](/Images/OutliningIndicators/InBlock.gif)
![](/Images/OutliningIndicators/InBlock.gif)
![](/Images/OutliningIndicators/InBlock.gif)
![](/Images/OutliningIndicators/ExpandedBlockEnd.gif)