本文整理匯總了VB.NET中Microsoft.SqlServer.Server.IBinarySerialize.Write方法的典型用法代碼示例。如果您正苦於以下問題:VB.NET IBinarySerialize.Write方法的具體用法?VB.NET IBinarySerialize.Write怎麽用?VB.NET IBinarySerialize.Write使用的例子?那麽, 這裏精選的方法代碼示例或許可以為您提供幫助。
在下文中一共展示了IBinarySerialize.Write方法的1個代碼示例,這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚,您的評價將有助於係統推薦出更棒的VB.NET代碼示例。
示例1: Write
' The binary layout is as follows:
' Bytes 0 - 19: string text, padded to the right with null characters
' Bytes 20+: Double value
Public Sub Write(ByVal w As System.IO.BinaryWriter) _
Implements Microsoft.SqlServer.Server.IBinarySerialize.Write
Dim maxStringSize As Integer = 20
Dim stringValue As String = "The value of PI: "
Dim paddedString As String
Dim value As Double = 3.14159
' Pad the string from the right with null characters.
paddedString = stringValue.PadRight(maxStringSize, ControlChars.NullChar)
' Write the string value one byte at a time.
Dim i As Integer
For i = 0 To paddedString.Length - 1
w.Write(paddedString(i))
Next
' Write the double value.
w.Write(value)
End Sub