.计次循环首 (10, a)
mixerGetDevcaps (a - 1, caps, 48)
返回数据 = 数组到文本 (caps.szPname, 16)
.如果真 (寻找文本 (返回数据, “扬声器”, , 假) ≠ -1)
组合框1.加入项目 (返回数据 + 到文本 (a), )
.如果真结束
.计次循环尾 ()
.计次循环首 (10, a)
mixerGetDevcaps (a - 1, caps, 48)
返回数据 = 数组到文本 (caps.szPname, 16)
.如果真 (寻找文本 (返回数据, “扬声器”, , 假) ≠ -1)
组合框1.加入项目 (返回数据 + 到文本 (a), )
.如果真结束
.计次循环尾 ()