سلام
من هرچی گشتم تو اینترنت فقط از طریق mciSendString بود که تو چندتا از وبسایت ها فقط همین راه رو رفته بودند
ولی من نتونستم از اون تو VB استفاده کنم
احتمالا یه چیزی رو باید Import میکردم API ویا DLL ای خاص (نمیدونم)
ولی در هر صورت روش ارائه شده به صورت زیر بوده
mciSendString("open new Type waveaudio Alias recsound", "", 0, 0)
mciSendString("record recsound", "", 0, 0)
راستی یه کد دیگر هم بود که تعداد ورودی ها و خروجی های صدای کامپیوتر را نشان میداد شاید بدردتان بخورد
من این ها رو تو گوگل پیدا کردم