【VB】VB写的GUID生成器下载

0xAA55

虽然找不到源代码了，但是大概的方法还是很简单的。

1. Type GUID
   
2.     Data1 As Long
   
3.     Data2 As Integer
   
4.     Data3 As Integer
   
5.     Data4(7) As Byte
   
6. End Type
   
7. 
   
8. Declare Function CoCreateGuid Lib "ole32.dll" (pguid As GUID) As Long

复制代码

通过调用这个API就可以得到GUID了。然后自己把数字转换成十六进制就行。
可以通过Hex$()函数来实现，也可以自己实现，我更觉得自己实现比较好因为Hex不能把位数固定为你想要的位数。当然用String函数和Len函数来补充0也是可以的。

下载地址：
getGUID.exe (28 KB, 下载次数: 12)

2014-3-15 17:27 上传

点击文件名下载附件

我有个梦

学习了。不错

Anonymous

顶一个。。。。。。。。。。。。。