vb.net 教程 3-5 窗体编程对话框1 OpenFileDialog & SaveFileDialog

46 阅读 0 评论 31 点赞

我是靠谱客的博主超帅画笔，最近开发中收集的这篇文章主要介绍vb.net 教程 3-5 窗体编程对话框1 OpenFileDialog & SaveFileDialog，觉得挺不错的，现在分享给大家，希望可以做个参考。

概述

版权声明：本文为博主原创文章，转载请在显著位置标明本文出处以及作者网名，未经作者允许不得用于商业目的。
不同于本章第3节所讲的对话框，

inputbox、messagebox、msgbox都是调用的方法，

本节所讲的对话框是在vs工具箱中的组件。

vs提供了颜色打开文件对话框、保存文件对话框、对话框、字体对话框、文件夹对话框五个组件：

不同于控件，组件不会显示在窗体上。双击OpenFileDialog，可以看到已经添加到了设计窗体的下面：

OpenFileDialog：打开文件对话框；SaveFileDialog：保存文件对话框。由于这两个的属性和方法差不多，这里一并讲：

重要属性：

Filter：当前打开/保存文件对话框中的文件的扩展名。说明和扩展名按对设置。例如

如果不是说明和扩展名成对出现，那么vs就会提示错误：

Title：对话框的标题

FileName：设置或者获取打开/保存的文件名

InitialDirectory：初始目录

我用不同的颜色进行了标注说明这几个属性在对话框中的位置：

方法：

ShowDialog()：显示对话框

例如：OpenFileDialog1.ShowDialog()，但是一般情况下不这么写，我在代码中具体说明

参看以下代码：


Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
'如果打开文件对话框中按下了“打开”按钮，那么
If OpenFileDialog1.ShowDialog() = DialogResult.OK Then
'获得选中文件的文件名
Label1.Text = OpenFileDialog1.FileName
'执行操作
'当然文件操作我以后会讲
Else '如果按下的不是“打开”按钮，实际也只有“取消”，那么
Exit Sub
End If
End Sub

运行如下：

保存文件对话框的代码差不多：


Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
'如果打开文件对话框中按下了“打开”按钮，那么
If SaveFileDialog1.ShowDialog() = DialogResult.OK Then
'获得选中文件的文件名
Label2.Text = SaveFileDialog1.FileName
'执行操作
'当然文件操作我以后会讲
Else '如果按下的不是“打开”按钮，实际也只有“取消”，那么
Exit Sub
End If
End Sub

有区别的地方是，如果选择已经存在的文件，那么会提示是否替换：