Foxtable(狐表)用户栏目专家坐堂 → 电脑识别码


  共有2925人关注过本帖树形打印复制链接

主题:电脑识别码

帅哥,在线噢!
有点蓝
  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107729 积分:547978 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/9/4 10:04:00 [只看该作者]

'添加外部引用:System.Management.dll,代码

Dim mc As new System.Management.ManagementClass("Win32_Processor")
mc = new System.Management.ManagementClass("Win32_PhysicalMedia")
Dim  moc = mc.GetInstances()
For Each mo As System.Management.ManagementObject In moc
    Output.Show( mo.Properties("SerialNumber").Value.ToString())
Next


 回到顶部
总数 11 上一页 1 2