Question

vb.net编的记事本怎么保存后的文档成乱码

代码： Private Sub 保存ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 保存ToolStripMenuItem.Click
Me.SaveFileDialog1.ShowDialog() '这是一个保存的控件和这个控件的属性！
If (Me.SaveFileDialog1.FileName <> "") Then '如果保存的内容不等于空白时，那么
If (Me.OpenFileDialog1.FilterIndex = 1) Then '1是一个标识
Me.RichTextBox1.SaveFile(Me.SaveFileDialog1.FileName, RichTextBoxStreamType.PlainText) '当标识等于1时保存的事PlainText格式
Else '否则
Me.RichTextBox1.SaveFile(Me.SaveFileDialog1.FileName, RichTextBoxStreamType.RichText) '保存的是另一种格式
End If
End If
End Sub

Answer 1

这是编码问题。
用下面的方法：
If (Me.OpenFileDialog1.FilterIndex = 1) Then '1是一个标识
System.IO.File.WriteAllText(Me.SaveFileDialog1.FileName, RichTextBox1.Text, System.Text.Encoding.Default) '当标识等于1时保存的事PlainText格式
Else '否则
System.IO.File.WriteAllText(Me.SaveFileDialog1.FileName, RichTextBox1.Rtf, System.Text.Encoding.Default) '保存的是另一种格式

Answer 2

读取文件和写入文件最好用2进制，这方便些，而且
因为有些字是单字节，有些双字节，而且页码也不一样，没处理好就会变乱码

Answer 3

这样子保存的是rtf格式，用写字板打开试试？