具有文件名中的句点的SaveAs Dialog不返回扩展名

Question

如何确保SaveAs对话框返回扩展名为？

的文件名

例如：

'测试'（。txt）返回'test.txt'

可是：

'Test 1.0'（。txt）返回'Test 1.0'（应该是'Test 1.0.txt'）

可能的解决方案：我可以手动检查末尾是否有'.txt'，但如果有两种扩展类型（.txt，.doc），我怎么知道用户选择了哪一种？

谢谢！

Answer 1

我相信您需要将.SupportMultiDottedExtensions设置为True，如下所示：

Using tDialog As SaveFileDialog = New SaveFileDialog
With tDialog
        .Filter = "Text Files|*.txt"
        .SupportMultiDottedExtensions = True
        .ShowDialog()
        MsgBox(.FileName)
    End With
End Using