Dim filename As String
With OpenFileDialog1
.Title = "文件"
.Filter = "txt 文档(*.txt)|*.txt"
.ShowDialog()
filename = .FileName
End With
If filename.Length > 0 Then
Me.RichTextBox1.LoadFile(filename)
End If

这里loadfile出现问题，请问是什么原因啊？

Me.RichTextBox1.LoadFile(filename, RichTextBoxStreamType.PlainText)
试试这样.

Me.RichTextBox1.SaveFile(filename, RichTextBoxStreamType.PlainText)
为什么当我按下保存的时候，对话框不会不会消失啊？

你没有指定啊.
你加个
IF OpenFileDialog1.ShowDialog() == Windows.Forms.DialogResult.OK Then
....
End IF

........
这个要写什么啊
我就是不知道这个啊
谢谢?

[此贴子已经被作者于2007-4-5 17:26:35编辑过]

版主快来救命啊