VS-VB.NET十进制转换为十六进制保留需要的位

最新推荐文章于 2023-03-01 10:58:37 发布

原创最新推荐文章于 2023-03-01 10:58:37 发布 · 802 阅读

3 ·

CC 4.0 BY-SA版权

VB.net 专栏收录该内容

7 篇文章

订阅专栏

本文介绍了一个VBScript函数，用于将十进制数转换为十六进制字符串，并确保结果字符串达到指定长度。该函数首先使用内置的Hex函数进行转换，然后通过前置零填充或截取字符串的方式调整其长度。

 Public Function decToHex(ByVal decNumber As Double, ByVal reservedDigits As Integer) As String '将十进制转换为十六进制字符串，保留需要的位
        Dim hexStr = Hex(decNumber)
        If hexStr.Length < reservedDigits Then
            For i As Integer = 1 To reservedDigits - hexStr.Length
                hexStr = "0" & hexStr
            Next
        ElseIf hexStr.Length >= reservedDigits Then
            hexStr = Strings.Right(hexStr, 4)
        End If
        Return hexStr
    End Function