把Default改成UTF-8或unicode等，看你网页是什么格式的。删掉default会弹出属性或方法列表，里面有格式选择，就几种格式，多试几次就对了。
成都创新互联公司是一家专注于网站制作、做网站与策划设计,潞州网站建设哪家好?成都创新互联公司做网站,专注于网站建设10余年,网设计领域的专业建站公司;建站业务涵盖:潞州等地区。潞州做网站价格咨询:13518219792
这是编码问题。
用下面的方法：
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) '保存的是另一种格式
设置网页编码，可以通过Web.Config 配置
具体看你原来的编码设置了
也可以单独给form设置编码
在使用streamReader和streamWriter的时候使用编码参数。
比如：dim sw As New StreamRriter("H:\编程资料\1.txt"，System.Text.Encoding.Default)
dim sr As New StreamWeader("H:\编程资料\2.txt"，true,System.Text.Encoding.Default)
