windowsVISTAを使用しています。

質問

windowsVISTAを使用しています。
http://msdn.microsoft.com/en-us/library/aa394542(VS.85).aspx

このWMIを使用したVBSを作り、デュアルモニタのシリアルを二つとも習得したいのですが、
どのように構文を書けばいいのかさっぱりで・・・・
どなたかご教授ください。

XPでは使用できないみたいです。

回答No.2

1050 円（@1050YEN）

確かに長いですね。。。

でも要約しちゃうと、以下のような感じです。
これでデュアルモニタまで拾えるかはわかりませんが、、、

Imports System.Management　'要：参照設定[System.Management]

Module Module1
　　Sub Main()
　　　　Dim l_objQry As New ObjectQuery("SELECT * FROM Win32_DesktopMonitor")
　　　　Dim l_Scope As New ManagementScope("\\.\root\cimv2")
　　　　Dim l_mng As New ManagementObjectSearcher(l_Scope, l_objQry)

　　　　For Each info As ManagementObject In l_mng.Get()
　　　　　　Dim l_strBuff As String = ""
　　　　　　For Each l_prp As PropertyData In info.Properties
　　　　　　　　l_strBuff &= String.Format("{0}:={1}", l_prp.Name, l_prp.Value) & vbCrLf
　　　　　　Next
　　　　　　MsgBox(l_strBuff)
　　　　Next
　　End Sub
End Module