额 是的 写着玩的作者: zsxy2012 时间: 2024-3-19 17:47
我也下载看了一下,貌似有些驱动只能在网页上点击下载,这样直接下载不了作者: yhy27 时间: 2024-4-17 11:25
感谢分享作者: gdwlwl 时间: 2024-4-25 20:18
Private Sub wmiSoundDeviceInfo() Dim wmiObjSet As SWbemObjectSet Dim obj As SWbemObject Set wmiObjSet = GetObject(winmgmts:{impersonationLevel=impersonate}). _ InstancesOf(Win32_SoundDevice) On Local Error Resume Next For Each obj In wmiObjSet MsgBox obj.ProductName Next End Sub作者: duisir 时间: 2024-5-2 22:17
6666666666666666666666666666666666666666666666作者: shaoxing0117 时间: 2024-5-28 15:23
感谢分享作者: shaoxing0117 时间: 2024-6-23 10:45
支持开源~!感谢分享作者: dong9277 时间: 2024-9-4 17:42
这个好好学习学习