第6章文件管理与菜单设计 6.1文件和流 6.2菜单栏 6.3工具栏与状态栏 6.4实践检验
6.1文件和流 6.2菜单栏 6.3工具栏与状态栏 6.4实践检验 第6章 文件管理与菜单设计
第6章文件管理与菜单设计 本章知识点: 文件和流的相关概念及操作 ●通用对话框的应用 ●菜单制作及应用 ●工具栏制作及应用
本章知识点： ⚫文件和流的相关概念及操作 ⚫通用对话框的应用 ⚫菜单制作及应用 ⚫工具栏制作及应用 第6章 文件管理与菜单设计
61文件和流 6.1.1文件类型和操作 根据数据的编码,及存储形式的不同,νB、N提供了3种文件访问模式 顺序访问模式 随机访问模式。 二进制访问模式 但不论是用哪种模式访问文件,基本操作步骤是相同的,一般都需要经 过以下3步完成。首先打开文件,如果文件不存在应先创建文件。当文件打 开后,就可以对文件进行读或写操作了。当文件操作完毕,应该关闭文件 如图6-1所示。 创建打开文件 读出或写入 关闭文件 图6-1文件操作步骤
6.1 文件和流 6.1.1 文件类型和操作 根据数据的编码，及存储形式的不同，VB.NET提供了3种文件访问模式： -- 顺序访问模式。 -- 随机访问模式。 -- 二进制访问模式。 但不论是用哪种模式访问文件，基本操作步骤是相同的，一般都需要经 过以下3步完成。首先打开文件，如果文件不存在应先创建文件。当文件打 开后，就可以对文件进行读或写操作了。当文件操作完毕，应该关闭文件， 如图6-1所示
1刨建或打开文件的 FileOpen方法 对上述3种文件访问模式,可以用 leSystem FileOpen方法打开文件 FileOpen为打开的文件分配用于进行Io操作的缓冲区并确定用于该缓冲 区的访问模式。 1)格式 Public shared Sub FileOpen( FileNumber As integer, FileName As String Mode As open Mode Optional Access As openAd OpenAccess Default Optional Share As OpenShare Open share. Default Optional RecordLength As Integer 2)参数说明 FileNumber:必选。任何有效的文件号。可使用 FreeFile函数获取下 可用的文件号 FileName:必选。一个指定文件名的 String表达式,其中可包含目 录或文件夹以及驱动器
1 创建或打开文件的FileOpen方法 对上述3种文件访问模式，可以用FileSystem.FileOpen 方法打开文件。 FileOpen 为打开的文件分配用于进行 I/O 操作的缓冲区并确定用于该缓冲 区的访问模式。 1)格式 Public Shared Sub FileOpen ( _ FileNumber As Integer, _ FileName As String, _ Mode As OpenMode, _ Optional Access As OpenAccess = OpenAccess.Default, _ Optional Share As OpenShare = OpenShare.Default, _ Optional RecordLength As Integer = -1 _ ) 2)参数说明 -- FileNumber：必选。任何有效的文件号。可使用 FreeFile 函数获取下 一个可用的文件号。 -- FileName：必选。一个指定文件名的 String 表达式，其中可包含目 录或文件夹以及驱动器
Mode:必选。指示调用文件访问函数时如何打开文件。按顺序访问 文件(如文本文件)时使用 Input、 Output和 Append;按二进制文件访问 时使用 Binary;按随机文件访问时使用 Random。 Access:可选。指示调用文件访问函数时如何打开文件。默认为可读 取和写入访问,即 ReadWrite。 Default:允许读取和写入访问。这是默认 设置;Read:允许读取访问; ReadWrite:允许读取和写入访问; Write: 允许写入访问。 Share:可选。一个指定不允许其他进程对打开的文件所进行的操作。 默认为 Lock Read Write。 Default:这是默认值,即 LockReadwrite ockRead:其他进程无法读取该文件; LockReadwrite:其他进程无法读取 或写入该文件; LockWrite:其他进程无法写入该文件; Shared:任何进程 都可以读取或写入该文件。 - RecordLength:可选。小于或等于32767(字节)的数字。对于为 进行随机访问而打开的文件,此值是记录的长度。对于顺序文件,此值是 缓冲的字符数。 3)示例 以下举例说明,根据对文件的不同操作如何使用 FileOpen方法的示例
-- Mode：必选。指示调用文件访问函数时如何打开文件。按顺序访问 文件（如文本文件）时使用 Input、Output 和 Append；按二进制文件访问 时使用 Binary ；按随机文件访问时使用Random。 -- Access：可选。指示调用文件访问函数时如何打开文件。默认为可读 取和写入访问，即 ReadWrite。Default：允许读取和写入访问。这是默认 设置； Read：允许读取访问； ReadWrite：允许读取和写入访问；Write： 允许写入访问。 -- Share：可选。一个指定不允许其他进程对打开的文件所进行的操作。 默认为 Lock Read Write。Default：这是默认值，即LockReadWrite； LockRead：其他进程无法读取该文件；LockReadWrite：其他进程无法读取 或写入该文件；LockWrite：其他进程无法写入该文件；Shared：任何进程 都可以读取或写入该文件。 -- RecordLength：可选。小于或等于 32,767（字节）的数字。对于为 进行随机访问而打开的文件，此值是记录的长度。对于顺序文件，此值是 缓冲的字符数。 3)示例 以下举例说明，根据对文件的不同操作如何使用 FileOpen 方法的示例
以 Input模式打开进行读取操作处理的文件名为 TestFile的顺序文件。 FileOpen (1, TESTFILE Open Mode Input 加入对 TestFile文件进行读取访问处理的代码 FileClose(1) 关闭 TestFile文件 以oυtpt模式打开该文件,任何进程都可以写入该文件。 FileOpen(1, TESTFILE Open Mode Output, OpenAccess Default, Open Share Shared) 加入对 TestFile文件进行写入访问处理的代码,文件关闭前可以用另 种模式打开 FileClose(1) 以 Random模式打开 TestFile随机文件进行读写操作,该文件含结构 Person的记录 Structure person Dim Name As String Dim ID As Integer End structure Public Sub ExampleMethodo Len( Person)记录长度为Name和ID长度之和为34。 Access、 Share参 数省略,但“不能省
以 Input 模式打开进行读取操作处理的文件名为 TestFile的顺序文件。 FileOpen(1, "TESTFILE", OpenMode.Input) ' 加入对TestFile文件进行读取访问处理的代码 FileClose(1) ' 关闭TestFile文件 以 Output 模式打开该文件，任何进程都可以写入该文件。 FileOpen(1, "TESTFILE", OpenMode.Output, OpenAccess.Default, OpenShare.Shared) '加入对TestFile文件进行写入访问处理的代码，文件关闭前可以用另一 种模式打开 FileClose(1) 以 Random 模式打开TestFile随机文件进行读写操作，该文件含结构 Person 的记录。 Structure Person Dim Name As String Dim ID As Integer End Structure Public Sub ExampleMethod() ' Len(Person)记录长度为Name和 ID长度之和为 34。Access、Share参 数省略，但“,”不能省
FileOpen(1," TESTFILE Open Mode. Random, ,, Len(person)) 加入对 TestFile随机文件进行读写处理的代码 FileClose (1) End sub 以 Binary模式打开进行只写操作处理的文件名为 Testfile的二进制文件。 FileOpen(1," TESTFILE Open Mode. Binary, OpenAccess. Write) 加入对 TestFile二进制文件进行写入访问处理的代码 File Close(1) 以 Binary模式打开该文件进行读取,其他进程无法读取该文件。 FileOpen(1," TESTFILE Open Mode. Binary, OpenAccess. Read, Open Share. LockRead) 2顺序文件的读写 顺序文件也就是普通的文本文件,文件里面的数据存取方式为顺序存取 即数据是一个接—一个地顺序写入文件中的。读数据时,也是一个接一个地 顺序读出文件的。 按顺序访问文件时,无法更改其数据,可以读取数据、并追加新数据 或用新数据改写。如果为了进行输入而打开该文件,即使不直接写入该文 件,文件的内容也将被改写
FileOpen(1, "TESTFILE", OpenMode.Random, , , Len(Person)) '加入对TestFile随机文件进行读写处理的代码 FileClose(1) End Sub 以 Binary 模式打开进行只写操作处理的文件名为 TestFile的二进制文件。 FileOpen(1, "TESTFILE", OpenMode.Binary,OpenAccess.Write) ' 加入对TestFile二进制文件进行写入访问处理的代码 FileClose(1) 以 Binary 模式打开该文件进行读取，其他进程无法读取该文件。 FileOpen(1, "TESTFILE", OpenMode.Binary, OpenAccess.Read, OpenShare._ LockRead) 2 顺序文件的读写 顺序文件也就是普通的文本文件，文件里面的数据存取方式为顺序存取， 即数据是一个接一个地顺序写入文件中的。读数据时，也是一个接一个地 顺序读出文件的。 按顺序访问文件时，无法更改其数据，可以读取数据、并追加新数据， 或用新数据改写。如果为了进行输入而打开该文件，即使不直接写入该文 件，文件的内容也将被改写
1) Write、 Writeline函数写操作 要向顺序文件中写入内容,应以 Output或 Append方式打开,然后使用 Write、 Writeline函数将数据写入文件中 Public Sub Write Byval FileNumber As Integer, ByVal ParamArray Output As Object Public Sub WriteLine( Byval FileNumber As Integer, ByVal ParamArray Output As_ object FileNumber:必选。包含任何有效文件号的 Integer表达式。 Output:可选。要写入文件的一个或多个用逗号分隔的表达式 将数据写入顺序文件。用 Write写入的数据通常由Inpυut从文件中读取。 2)儿 LineInput、 Input方法读操作 FileSystem. LineInput方法 从打开的顺序文件中读取一行并将其赋值给一个 String变量。 Public Shared Function LineInput ( FileNumber As Integer )As String Linelnput函数从文件中一次读取一个字符,直到它遇到回车符(Ch 3))或回车/换行符(Chr(13)+Chr(10))序列为止。该函数 跳过回车换行符序列,而不是将其附加到字符串中
1)Write、WriteLine 函数写操作 要向顺序文件中写入内容，应以Output或Append方式打开，然后使用 Write、WriteLine 函数将数据写入文件中： Public Sub Write( ByVal FileNumber As Integer, ByVal ParamArray Output As Object ) Public Sub WriteLine( ByVal FileNumber As Integer, ByVal ParamArray Output() As _ Object ) -- FileNumber：必选。包含任何有效文件号的 Integer 表达式。 -- Output：可选。要写入文件的一个或多个用逗号分隔的表达式。 将数据写入顺序文件。用 Write 写入的数据通常由 Input 从文件中读取。 2)LineInput 、Input 方法读操作 -- FileSystem.LineInput 方法 从打开的顺序文件中读取一行并将其赋值给一个 String 变量。 Public Shared Function LineInput (FileNumber As Integer ) As String LineInput 函数从文件中一次读取一个字符，直到它遇到回车符（Chr （13））或回车/换行符 （Chr（13） + Chr（10））序列为止。该函数 跳过回车/换行符序列，而不是将其附加到字符串中
File system. Input方法 读取打开的顺序文件中的数据,并将这些数据赋值给变量。 FileSystem. Input方法将磁盘文件中的数据读入变量中,它被重载,其 语法如下 File System Input(Int32, Boolean) File SystemInput (Int32, Byte) File System Input (Int32, Char) FileSystem. Input(Int32, DateTime) File System Input(Int32, Decimal) Ot(Int32, Double FileSystem. Input(Int32, Int16) File System Input (Int32, Int32 File System Input(Int32, Int64 File System Input(Int32, Object File System Input (Int32, Single FileSystem. Input(Int32, String
-- FileSystem.Input 方法 读取打开的顺序文件中的数据，并将这些数据赋值给变量。 FileSystem.Input方法将磁盘文件中的数据读入变量中，它被重载，其 语法如下： FileSystem.Input (Int32, Boolean) FileSystem.Input (Int32, Byte) FileSystem.Input (Int32, Char) FileSystem.Input (Int32, DateTime) FileSystem.Input (Int32, Decimal) Ot (Int32, Double) FileSystem.Input (Int32, Int16) FileSystem.Input (Int32, Int32) FileSystem.Input (Int32, Int64) FileSystem.Input (Int32, Object) FileSystem.Input (Int32, Single) FileSystem.Input (Int32, String)
举例 例6-1运用Wite及 WriteLine写3行字符到当前目录下的fett中,再分 别用Inpu和 Linelnpu分别读出 file. txt中的内容到文本框中显示,分析结果。 1e事本回回冈 團Fon1回区 文件)编辑〖)格式) Name 1 查看Q)帮助Q Nane1”,1 Name 2 Name 2.2 Name 3 Name 33 3 ame Name 2.2 "Name 3,3 but ton1 》 图62写入ftxt文件的内容图63读出的内容
-- 举例 例6-1 运用Write 及WriteLine 写3行字符到当前目录下的file.txt中，再分 别用Input和 LineInput分别读出file.txt中的内容到文本框中显示，分析结果
