方法一：直接获取computeID
Dim str As String = ComputerIdmsgbox(str)
方法二：生成全球唯一的编号
Dim str As String = Guid.NewGuid().tostringmsgbox(str)
加好友 
发短信
Post By：2016/6/11 0:03:00 [显示全部帖子]
