USBメモリのシリアル番号を取得する

    'USBメモリのディスク情報を取得するSELECT
    Dim SQL As String _
　　　　　　 = "SELECT * FROM Win32_DiskDrive where InterfaceType='USB'"

    'データを順次取得
    For Each drive As System.Management.ManagementObject _
　 In New System.Management.ManagementObjectSearcher("root\CIMV2", SQL).Get()

        'デバイスのキャプションを取得
        Dim capt As String = drive.GetPropertyValue("Caption").ToString
        'デバイスID（シリアル番号）を取得
        Dim devId As String = drive.GetPropertyValue("PNPDeviceID").ToString

        'メッセージボックスに表示
        MessageBox.Show("Caption：" & capt & "　SerialNo：" & devId)
    Next

    MessageBox.Show("Fin.")

    //USBメモリのディスク情報を取得するSELECT
    String SQL = "SELECT * FROM Win32_DiskDrive where InterfaceType='USB'";

    //データを順次取得
    foreach  (System.Management.ManagementObject drive in new System.Management.ManagementObjectSearcher("root\\CIMV2", SQL).Get()) {

        //デバイスのキャプションを取得
        String capt = drive.GetPropertyValue("Caption").ToString();
        //デバイスID（シリアル番号）を取得
        String devId = drive.GetPropertyValue("PNPDeviceID").ToString();

        //メッセージボックスに表示
        MessageBox.Show("Caption：" + capt + "  SerialNo：" + devId);
    }

    MessageBox.Show("Fin.");