2005122923645

您当前的位置:必威体育网址 -> 教程中心 -> 编程经验 -> JAVA DotNet -> 教程内容 退出登录 必威体育网址,
栏目导航
· Visual Basic· Delphi
· Visual C++· C++ Builder
· JAVA DotNet· 其他相关
热门教程
· 如何在Visual Basic…
· 使用Visual Basic操…
· 使用VB6.0设计Activ…
· VB动态调用外部函数…
· 建立一个程序员自己…
· 如何编写高质量的VB…
· [图文] 为更新到Visual Bas…
· 再谈在VB中调用VC++…
· 用VB语言编程实现JP…
· 用DTS实现SQL数据库…
相关教程
· 把握VB.NET中的流(S…
· 把握VB.NET中的流(S…
· JAVA的网络功能与编…
· [组图] Flash 3d效果实例–…
· 不只愚人 恶作剧也恐…
· [组图] 实战 J2EE 开发购物…
· 盖茨称员工博客利大…

把握VB.NET中的流(Stream) (二)
必威体育网址,作者:佚名 来源: 发布时间:2005-12-29 18:02:41发布人:admin

减小字体 增大字体


把握VB.NET中的流(Stream) (二)

灵活多样的IO操作

有时候,在数据和字节数组之间转换是一件繁琐的事情。为了避免这些无聊的转换和简化代码,采用StreamReader/StreamWriteBinaryReader/BinaryWriter不愧为明智之举。StreamReader/StreamWrite分别由TextReader/TextWriter类派生,自动执行字节编码的转换。BinaryReader/BinaryWriterStream派生,主要以二进制的形式读写数据。

从二进制文件读数据的时候,首先创建一个BinaryReader的实例,BinaryReader的构建函数接受一个FileStream对象,代表将要读的文件。我们前面已经看过,可以用File.OpenRead 或者 File.OpenWrite 方法创建FileStream对象。

如下所示:

Dim BR As New IO.BinaryReader(IO.File.OpenRead(path))

Dim BW As New IO.BinaryWriter(IO.File.OpenWrite(path))

BinaryWriter类有WriteWriteLine两种方法,都可以接受任何类型的数据作为参数写入文件(WriteLine在文件尾追加一行数据)。BinaryReader类有很多读数据的方法,数据存储在文件上的时候,并没有任何关于自己类型的信息,所以读数据的时候,必须选择合适的重载Read方法。

下面的例子假设BW是一个已经初始化过的BinaryWriter对象,表示如何写一个字符串、整数、双精度数字到文件:

BW.WriteLine(“A String”)

BW.WriteLine(12345)

BW.WriteLine(123.456789999999)

读回数据的时候,必须选择BinaryReader合适的Read方法:

Dim s As String = BR.ReadString()

Dim i As Int32 = BR.ReadInt32()

Dim dbl As Double = BR.ReadDouble()

对于文本文件,采用StreamReader/StreamWriter对象。方法跟上面差不多,写数据同样用WriteWriteLine方法。Read方法读一个字符,ReadLine读一行数据(直到有回车/换行符为止),ReadToEnd读所有的字符,到文件结束。

对象序列化

到目前为止,我们只是把简单类型的数据写到文件中并读回程序。而实际上,大多数的程序读写的数据可能并不是简单类型,而是复杂的结构,例如:数组,数组列表,哈希表等。于是,我们采取一种成为序列化的技术,首先把数组的值转化为字节序列,然后写入文件,这样整个数组就存储下来。相反,我们称之为反序列化。

序列化是.NET的一个很大的话题,这列介绍一下基本的信息。

BinaryFormatterSerialize Deserialize方法把一个对象保存到文件和读回程序。首先,imports System.RunTime.Serialization.Formatters,免得写那么长的申明。Formatters名空间包含了BinaryFormatter类,用于以二进制的数据序列化对象。

创建BinaryFormatter实例,接着调用Serialize方法Serialize接受两个参数:一个是可写的FileStream实例,用于保存数据的文件;另外一个是对象本身:

Dim BinFormatter As New Binary.BinaryFormatter()

Dim R As New Rectangle(10, 20, 100, 200)

BinFormatter.Serialize(FS, R)

BinaryFormatterDeserialize方法只有一个参数,FileStream实例。在当前位置,反序列化得到一个类型不明的对象,我们必须用Ctype转换为原来的对象。下面的例子反序列化上面的文件得到原来的Rectangle对象:

Dim R As New Rectangle()

R = CType(BinFormatter.Deserialize(FS), Rectangle)

我们也可以以XmlFormatter进行对象序列化。首先在IDEProject菜单选择添加System.Runtime.Serialization.Formatters.Soap,然后就可以进行创建SoapFormatter对象了,方法跟BinFormatter一样,只不过数据的存储采用XML格式:

Dim FS As New IO.FileStream(“c:Rect.xml”, IO.FileMode.Create, IO.FileAccess.Write)

Dim XMLFormatter As New SoapFormatter()

Dim R As New Rectangle(8, 8, 299, 499)

XMLFormatter.Serialize(FS, R)

打开c:Rect.xml ,实际上里面存储了这些内容:

<SOAP-ENV:Envelope xmlns:xsi=”https://www.w3.org/2001/XMLSchema-instance xmlns:xsd=”https://www.w3.org/2001/XMLSchema xmlns:SOAP-ENC=”https://schemas.xmlsoap.org/soap/encoding/ xmlns:SOAP-ENV=”https://schemas.xmlsoap.org/soap/envelope/ xmlns:clr=”https://schemas.microsoft.com/soap/encoding/clr/1.0 SOAP-ENV:encodingStyle=”https://schemas.xmlsoap.org/soap/encoding/“>

<SOAP-ENV:Body>

<a1:Rectangle id=”ref-1 xmlns:a1=”https://schemas.microsoft.com/clr/nsassem/System.Drawing/System.Drawing%2C%20Version%3D1.0.3300.0%2C%20Culture%3Dneutral%2C%20PublicKeyToken%3Db03f5f7f11d50a3a“>

<x>8x>

<y>8y>

<width>249width>

<height>499height>

a1:Rectangle>

SOAP-ENV:Body>

SOAP-ENV:Envelope>




[] [返回上一页] [打 印] [必威西甲,]
∷相关教程评论∷    (评论内容只代表网友观点,与本站立场无关!) [更多评论…]