以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]电脑不同，生成的号吗不同，这样的号码怎么生成？  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=86088)
--  作者：yinyb36
--  发布时间：2016/6/10 10:42:00
--  [求助]电脑不同，生成的号吗不同，这样的号码怎么生成？
电脑不同，生成的号吗不同，12位,如：  5404A6BE9713
--  作者：大红袍
--  发布时间：2016/6/11 0:03:00
--  

 方法一：直接获取computeID

 

Dim str As String = ComputerId
msgbox(str)

 

 方法二：生成全球唯一的编号

 

Dim str As String = Guid.NewGuid().tostring
msgbox(str)