Bitbreite ermitteln

Determine OS Bit Level

Kleine If-Abfrage, nix besonderes...

Dim OSBitLevel
If GetObject("winmgmts:root\cimv2:Win32_Processor='cpu0'").AddressWidth = 32 Then
OSBitLevel = 32
ElseIf GetObject("winmgmts:root\cimv2:Win32_Processor='cpu0'").AddressWidth = 64 Then
OSBitLevel = 64
End If