创建带有编码组合框选择如记事本

问题描述

我正在尝试创建一个savefile对话框以保存在富文本框中找到的文本

但记事本等编码方式不同:

enter image description here

对我来说,问题是组合框允许使用不同的编码

我如何将其添加到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