本文整理汇总了VB.NET中Microsoft.SqlServer.Server.IBinarySerialize.Read方法的典型用法代码示例。如果您正苦于以下问题:VB.NET IBinarySerialize.Read方法的具体用法?VB.NET IBinarySerialize.Read怎么用?VB.NET IBinarySerialize.Read使用的例子?那么恭喜您, 这里精选的方法代码示例或许可以为您提供帮助。
在下文中一共展示了IBinarySerialize.Read方法的1个代码示例,这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞,您的评价将有助于我们的系统推荐出更棒的VB.NET代码示例。
示例1: Read
' The binary layout is as follows:
' Bytes 0 - 19: string text, padded to the right with null
' characters
' Bytes 20+: double value
Public Sub Read(ByVal r As System.IO.BinaryReader) _
Implements Microsoft.SqlServer.Server.IBinarySerialize.Read
Dim maxStringSize As Integer = 20
Dim chars As Char()
Dim stringEnd As Integer
Dim stringValue As String
Dim value As double
' Read the characters from the binary stream.
chars = r.ReadChars(maxStringSize)
' Find the start of the null character padding.
stringEnd = Array.IndexOf(chars, ControlChars.NullChar)
If StringEnd = 0 Then
stringValue = Nothing
Exit Sub
End If
' Build the string from the array of characters.
stringValue = new String(chars, 0, stringEnd)
' Read the double value from the binary stream.
value = r.ReadDouble()
' Set the object's properties equal to the values.
Me.StringValue = stringValue
Me.DoubleValue = value
End Sub
开发者ID:VB.NET开发者,项目名称:Microsoft.SqlServer.Server,代码行数:35,代码来源:IBinarySerialize.Read
注:本文中的Microsoft.SqlServer.Server.IBinarySerialize.Read方法示例由纯净天空整理自Github/MSDocs等源码及文档管理平台,相关代码片段筛选自各路编程大神贡献的开源项目,源码版权归原作者所有,传播和使用请参考对应项目的License;未经允许,请勿转载。 |
请发表评论