vb经典案例 SaveFileDialog1.Filter="文本文件(*.txt)|*.txt|RTF格式文件(*.RTF)|*.RTF" SaveFileDialog1.FilterIndex=1 SaveFileDialog1.Title="保存文件" SaveFileDialog1.InitialDire