VB6.0超级模块函数.GetCpuIdEx获取电脑CPUI序列号
Function GetCpuIdEx() As String Dim TemMacId As String, TemMacId2 As String TemMacId2 = GetMAC TemMacId = geshi(TemMacId2) Dim temko As String Dim retstr As String Dim lentem As Long temko = GetCpuId lentem = Len(temko) .