Visual BasicNET程序设计教程第10章.pptVIP

* 第10章 对 话 框 第10章 对 话 框 10.1 使用对话框控件设计对话框 10.2 使用内部对话框设计对话框 10.1 使用对话框控件设计对话框 10.1.1 打开对话框OpenFileDialog 打开对话框OpenFileDialog用于打开一个文件，这个文件可以是本地或者是网络上的一个文件，并得到该文件的路径。OpenFileDialog和SaveFileDialog共有的属性、方法和事件如下： (1) FileName属性：包括文件的名称和路径的字符串。如果选取多个文件，用FileNames属性可得到所有选中的文件的名称和路径，FileNames是数组。 (2) Filter属性：在对话框中返回或者设置要显示的文件的过滤器。可以设置一个过滤器，如：“*.rtf(所有的rtf文件)|*.rtf”；也可以设置几个过滤器，如：“*.rtf|*.rtf|*.txt|*.txt”就有两个过滤器，每个过滤器都是由两部分构成的，这两部分之间用“|”隔开，前面部分是说明性文字，后面部分起到真正的过滤作用，例如第一个过滤器的两部分分别是“*.rtf(所有rtf文件)”和“*.rtf”，其中“*.rtf(所有rtf文件)”是说明性文字，而真正起到过滤作用的是“*.rtf”。 (3) FilterIndex属性：过滤器的索引值。注意：第1个过滤器的索引是1，不是0。 (4) DefualtExt属性：文件默认的扩展名，如果没有给出扩展名，则系统自动使用DefualtExt属性设置的扩展名作为文件的扩展名。 (5) AddExtension属性：确定是否将扩展名自动加到文件名上。逻辑类型，值为True时表示自动将扩展名添加到文件名上面。 (6) InitialDirectory属性：对话框的初始目录。 (7) Title属性：对话框标题栏上显示的文本。 (8) ShowDialog方法：显示对话框。 (9) FileOK事件：用户单击“打开”或者“保存”按钮时触发该事件。 OpenFileDialog具有下面的一些属性、方法和事件： (1) CheckFileExists属性：属性值为True时，如果用户选择了一个不存在的文件，就会显示一个警告信息；属性值为False时，如果用户选择了一个不存在的文件，并不会显示一个警告信息。 (2) MulitiSelect属性：确定是否可以选取多个文件。值为True时可以选取多个文件；值为False时不可以选取多个文件。 (3) ReadOnlyChecked属性：打开对话框后，打开对话框的只读复选框是否被选中。 (4) Reset方法：将所有选项设置为默认值。 (5) RestoreDirectory属性：确定关闭对话框后，是否重置对话框默认目录，值为Ture时表示重置对话框默认目录；值为False表示不重置对话框默认目录。 例10-1 窗体上有RichTextBox控件RichTextbox1和Button控件Button1各一个。Button1的Text属性为“打开”，单击“打开”按钮，可以打开一个文件，并显示在文本框RichTextBox中。窗体设计栏底部有一个打开对话框OpenFileDialog1。界面如图10-1所示。 图10-1 点击“打开”后readme.txt文件显示在文本框中 程序如下： Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click OpenFileDialog1.Title = 打开一个文件 打开对话框的标题栏显示“打开一个文件” OpenFileDialog1.RestoreDirectory = True 用户关闭对话框后重置对话框的默认目录 OpenFileDialog1.Filter = *.rtf|*.rtf|*.txt|*.txt ‘过滤器为“*.rtf|*.rtf|*.txt|*.txt”，也就是只显示.txt文件和.rtf文件 If OpenFileDialog1.ShowDialog = Dialo