VB.NET中如何获取电脑的全球唯一标识符？

本文共计505个文字，预计阅读时间需要3分钟。

什么是PC唯一ID？我们如何获取PC unique ID？是关于硬盘还是主板？我想在我的窗口程序中存储PC ID。请分享一个对我不适用的Private Function CpuIdAsString Dim computer As String=. Dim wmi As “什么是PC唯一ID？

PC唯一ID通常是指计算机的一个独特标识符，用于区分不同的计算机。这个ID可以基于CPU序列号、主板序列号或其他硬件信息生成。

我们如何获取PC unique ID？

获取PC unique ID的方法通常包括以下几种：

1. 使用CPU序列号：通过读取CPU的序列号来获取唯一ID。

2.使用主板序列号：通过读取主板的序列号来获取唯一ID。

3.使用Windows Management Instrumentation (WMI)或其他系统工具。

是关于硬盘还是主板？

PC唯一ID通常与主板或CPU有关，因为它们是计算机中更稳定的组件，其序列号更不易改变。

我想在我的窗口程序中存储PC ID。请分享一个不适用于我的Private Function CpuIdAsString

以下是一个简单的示例函数，用于获取CPU ID并将其转换为字符串。请注意，这个函数可能需要根据你的具体环境进行调整：

vb

Private Function CpuIdAsString() As String Dim cpuId As String= Dim wmi As Object

On Error Resume Next Set wmi=GetObject(winmgmts:\\.\root\cimv2) If Err.Number=0 Then Dim cpu As Object For Each cpu In wmi.ExecQuery(Select * from Win32_Processor) cpuId=cpu.ProcessorId Exit For Next End If On Error GoTo 0

Set wmi=Nothing CpuIdAsString=cpuIdEnd Function

>什么是PC唯一ID？
>我们怎样才能获得PC unqiue ID？
>是关于硬盘还是主板？

我想在我的窗口程序中存储PC ID.请分享我

这对我有用

Private Function CpuId() As String Dim computer As String = "." Dim wmi As Object = GetObject("winmgmts:" & _ "{impersonationLevel=impersonate}!\\" & _ computer & "\root\cimv2") Dim processors As Object = wmi.ExecQuery("Select * from " & _ "Win32_Processor") Dim cpu_ids As String = "" For Each cpu As Object In processors cpu_ids = cpu_ids & ", " & cpu.ProcessorId Next cpu If cpu_ids.Length > 0 Then cpu_ids = _ cpu_ids.Substring(2) Return cpu_ids End Function

见here