GUID批量生成器可二次修改

guid ＝ 取空白字节集 (16)
CoCreateGuid (guid)
a ＝ 取字节集数据 (取字节集左边 (guid, 4), #长整数型)
b ＝ 取字节集数据 (取字节集中间 (guid, 5, 2), #整数型)
c ＝ 取字节集数据 (取字节集中间 (guid, 7, 2), #整数型)
s ＝ “”
s ＝ s ＋ 取文本右边 (“00000000” ＋ 取十六进制文本 (a), 8) ＋ “-”
s ＝ s ＋ 取文本右边 (“0000” ＋ 取十六进制文本 (b), 4) ＋ “-”
s ＝ s ＋ 到小写 (取文本右边 (“0000” ＋ 取十六进制文本 (c), 4)) ＋ “-” ' 第三部分中的字母为小写字母
.计次循环首 (8, i)
s ＝ s ＋ 取文本右边 (“00” ＋ 取十六进制文本 (guid [i ＋ 8]), 2)
.如果真 (i ＝ 2)
s ＝ s ＋ “-”
.如果真结束

.计次循环尾 ()
返回 (“{” ＋ s ＋ “}”)