vba - 为什么这个VBA打印出随机垃圾？

Question

为什么这个 VBA 函数在字符串末尾打印出随机垃圾？

Public Function GenGuid() As String
    Dim TypeLib As Object
    Dim Guid As String
    Set TypeLib = CreateObject("Scriptlet.TypeLib")
    Guid = TypeLib.Guid
    ' format is {24DD18D4-C902-497F-A64B-28B2FA741661}
    Guid = Replace(Guid, "{", "")
    Guid = Replace(Guid, "}", "")
    'Guid = Replace(Guid, "-", "")
    GenGuid = Guid
End Function

print genguid()
816BF7CB-68B9-4D6B-855B-1273F22063DB 6
print genguid()
53664789-B0CD-422C-87B4-8928D93E5078  
print genguid()
FDD8ABDE-41F1-45E0-8330-9BA6161873BE i

引用

http://office.microsoft.com/client/helppreview.aspx?AssetId=HV805572319990&lcid=1033&NS=EXCEL%2EDEV&Version=12&queryid=&respos=1&HelpID=vblr6%2Echm1008930

版本

Excel 2007

Answer 1

这是一个长期存在的 GUID 错误，已记录很长时间了。它是某种空终止符，并且在两个地方都应该以 ASC(0) 结尾。我在 Excel 立即窗口中对其进行了测试，第二个“垃圾”数字在不同的值之间循环，并且只有第一个空字符始终为空。

但是，一旦从单元格调用该函数，在立即窗口中打印它就不再调用不同的最后一位数字，而是始终打印出两个 ASC(0) 值。奇怪。

但是，据我测试，修剪最后 2 个位置并没有显示出任何有害影响。