VB 计算字节/byte大小并用字符串表示，VB根据byte计算大小/用字符串表示，VB根据字节计算大小/用字符串表示，VB计算字节大小并用字符串表示，VB计算byte大小并用字符串表示，VB计算字节大小用字符串表示，VB计算byte大小用字符串表示，VB根据字节/byte计算大小，VB计算字节/byte大小，VB根据字节计算大小，VB根据byte计算大小，VB计算字节大小，VB计算byte大小，VB 字节大小，VB byte大小，VB 计算大小，VB 大小。

VB 计算字节/byte大小并用字符串表示：

Public Function Len2Str(L) As String                                            '根据字节计算大小
    If 0 <= L And L < 1024 Then Len2Str = L & " B"
    If 1024 <= L And L <= 1048576 Then Len2Str = CInt(L / 1024) & " KB"
    If 1048576 <= L And L <= 1073741824 Then Len2Str = CInt(L / 1048576) & " MB"
    If 1073741824 <= L Then Len2Str = CInt(L / 1073741824) & " GB"
End Function

使用示例：MsgBox Len2Str(1073741824), vbInformation, "提示:"