請問如何用vb得知 區域網路共有幾台電腦(編號：6851)

最近想用vb做一個讓區網的電腦可以聊天的程式 可使遇到了一個難題 就是不知道如何抓到整個區域網路上的電腦 只能寫死在程式中 不知有否方法可以抓到 非常謝謝