-- option strict on

This commit is contained in:
2023-08-23 00:04:25 -07:00
parent 3bc4f72658
commit e5c000432f
28 changed files with 192 additions and 279 deletions

View File

@@ -851,11 +851,11 @@ Namespace Fluent
random.NextBytes(DefaultNode)
End Sub
<Extension()>
Function GetVersion(ByVal guid As Guid) As GuidVersion
Dim bytes = guid.ToByteArray
Return ((bytes(VersionByte) And &HFF) >> VersionByteShift)
End Function
'<Extension()>
'Function GetVersion(ByVal guid As Guid) As GuidVersion
' Dim bytes = guid.ToByteArray
' Return ((bytes(VersionByte) And &HFF) >> VersionByteShift)
'End Function
Function GetDateTimeOffset(ByVal guid As Guid) As DateTimeOffset
Dim bytes As Byte() = guid.ToByteArray