如何传送一段文本?
如何传送Richtext控件中的一段文本到记事本软件中?
[解决办法]
Dim file_dial As New SaveFileDialog
Dim mystream As System.IO.FileStream
Dim SW As System.IO.StreamWriter
Dim cha() As Byte
file_dial.InitialDirectory = "C:\ "
file_dial.Filter = "code files (*.txt)|*.txt "
file_dial.FilterIndex = 0
file_dial.RestoreDirectory = True
If file_dial.ShowDialog() = DialogResult.OK Then
mystream = file_dial.OpenFile()
SW = New System.IO.StreamWriter(mystream)
SW.Write(sentenceBox.Text)
SW.Close()
mystream.Close()
End If