vb.net入门SaveFileDialog 组件的使用
|
SaveFileDialog 组件也是.net预设的有模式对话框之一,显示的是系统的“另存为”对话框,如下图一所示。我们可以通过它来快速开发一个能让用户马上熟悉和方便使用的Windows应用程序界面。
在vb.net的工具箱中,SaveFileDialog 组件图下图一所示:
SaveFileDialog 组件的大部分属性与OpenFileDialog 组件使用时一样的(相关文章参看:vb.net入门OpenFileDialog 组件的使用)。 当我们需要让用户弹出“另存为”对话框时,目录就指向一个指定的位置,我们用下面的代码来实现: SaveFileDialog1.InitialDirectory = "C:" 指定对话框打开的初始位置为盘符C: 设置对话框的文件过滤器,各个文件类型之间以“|”分隔,如下代码所示: SaveFileDialog1.Filter = "txt files|*.txt|All files|*.*" 我们还可以自定义对话框的标题,默认是“另存为”,以下代码可以实现我们自定义的标题: SaveFileDialog1.Title = "保存文字" 和OpenFileDialog 组件一样,我们是使用它的 ShowDialog 方法来给用户显示对话框的,OpenFile 方法将会以打开可读/写的权限打开用户选定的文件。 示例,如下代码所示,我们使用OpenFile方法打开一个Stream,然后就可以使用它对数据进行存取。 Dim myStream As System.IO.Stream SaveFileDialog1.InitialDirectory = "C:" saveFileDialog1.Filter = "txt files (*.txt)|*.txt|All files (*.*)|*.*" saveFileDialog1.FilterIndex = 2 SaveFileDialog1.RestoreDirectory = True SaveFileDialog1.Title = "保存" If saveFileDialog1.ShowDialog() = DialogResult.OK Then myStream = SaveFileDialog1.OpenFile() If Not (myStream Is Nothing) Then "在这里添加写入文件的代码 myStream.Close() End If End If 源代码网供稿. |


