问题描述
我正在尝试创建一个savefile对话框以保存在富文本框中找到的文本
但记事本等编码方式不同:
对我来说,问题是组合框允许使用不同的编码
If SaveFileDialog1.ShowDialog = DialogResult.OK Then
My.Computer.FileSystem.WriteallText(SaveFileDialog1.FileName,RichTextBox1.Text,False)
End If
解决方法
您要指定SaveFileDialog的Filter属性:
Using sfd As SaveFileDialog = New SaveFileDialog()
With sfd
.Filter = "Text|*.txt|Word|*.docx|Etc|*.etc"
If (sfd.ShowDialog = DialogResult.Ok Then
'...
End If
End With
End Using