此算法可以把字节大小的数字格式化成可以向用户展示的文本，例如 “1024” 可以转换成 “1 KB”。此外还可以指定传入的数字的单位，也就是“StartUnit”参数。
- .版本 2
- .子程序 Helper_File_SizeEncode, 文本型, , 格式化字节数字
- .参数 Size, 双精度小数型
- .参数 StartUnit, 整数型, 可空, 大小计算开始单位，默认0 0=Byte 1=KB 2=MB 3=GB 4=TB 5=PB
- .局部变量 units, 文本型, , "0"
- .局部变量 result, 双精度小数型
- .局部变量 i, 整数型
- .局部变量 beginUnit, 整数型
- .如果真 (Size ＜ 0)
- 返回 (“0 B”)
- .如果真结束
- .如果 (是否为空 (StartUnit))
- beginUnit ＝ 0
- .否则
- beginUnit ＝ StartUnit
- .如果结束
- units ＝ { “”, “K”, “M”, “G”, “T”, “P” }
- i ＝ 1
- result ＝ Size
- .判断循环首 (result ≥ 1024)
- result ＝ result ÷ 1024
- i ＝ i ＋ 1
- .判断循环尾 ()
- .如果 (i ＞ 6)
- 返回 (到文本 (Size) ＋ “ Bytes”) ' 什么 B 动静
- .否则
- 返回 (到文本 (四舍五入 (result, 2)) ＋ “ ” ＋ units [i ＋ beginUnit] ＋ “B”)
- .如果结束
来自圈子: Drea Robot |
变色卡
千斤顶