| 网站首页 | VB.Net实例分析 | .Net技术文摘 | 下载中心 | VB.Net书籍笔记 | .Net源码 | VBS脚本与组件调用 | Windows2008技术文摘 | 给我们留言 | 
最新公告:

  没有公告

您现在的位置: 乐博网 >> VB.Net实例分析 >> 多媒体编程 >> 实例分析正文
最新推荐 更多内容
VB.Net声卡信息查询的实例
VB.Net声卡信息查询的实例
作者:IVA    来源:乐博网     更新时间:2007-12-29

VB.Net声卡信息查询的实例

Imports System
Imports System.Management
Imports System.Windows.Forms

Namespace WMISample

    Public Class MyWMIQuery

        Public Overloads Shared Function Main() As Integer

            Try
                Dim searcher As New ManagementObjectSearcher( _
                    "root\CIMV2", _
                    "SELECT * FROM Win32_SoundDevice WHERE Caption = 'SigmaTel High Definition Audio CODEC'")

                For Each queryObj As ManagementObject in searcher.Get()

                                     '更多vb.net实例与vb.net技术文章 来自乐博网LOB.cn

                    Console.WriteLine("-----------------------------------")
                    Console.WriteLine("Win32_SoundDevice instance")
                    Console.WriteLine("-----------------------------------")
                    Console.WriteLine("Caption: {0}", queryObj("Caption")) ' 声卡描述
                    Console.WriteLine("DeviceID: {0}", queryObj("DeviceID")) '设备识别号
                    Console.WriteLine("Manufacturer: {0}", queryObj("Manufacturer")) '生产商
                    Console.WriteLine("PNPDeviceID: {0}", queryObj("PNPDeviceID")) 'PNP识别号
                    Console.WriteLine("PowerManagementSupported: {0}", queryObj("PowerManagementSupported"))

'是否支持电源管理
                    Console.WriteLine("Status: {0}", queryObj("Status")) ' 设备工作状态 
                Next
            Catch err As ManagementException
                MessageBox.Show(err.Message)
            End Try
        End Function
    End Class
End Namespace

  • 上一篇:

  • 下一篇:
  • 【字体: 】【打印此文】【关闭窗口
      相关文章:(只显示最新16条)
    VB.Net查询系统帐号信息[包括SID]的实例

    | 设为首页 | 加入收藏 | 联系站长 | | 友情链接 | 版权申明 |
    乐博网欢迎各种媒体转载我们的原创作品[转载请注明出处];我们鼓励更多VB.Net开发者一起加入研究与探讨;如发现文章访问错误、内容错误或版权疑问、内容有违相关法律(如涉及政治、色情、反动或散布虚假有害信息)等情况,请及时向我们举报,我们将及时纠正!
    联系邮箱:Shiny#vip.qq.com (#替换为@) QQ交流群: 40797788 [闽ICP备05014267号]