另存为带文件名中的句号的对话框不返回分机

Question

如何确保SaveAs对话框返回带扩展名的文件名？

例如：

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

但：

'测试1.0'（.txt）的返回 '测试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