用VB编写入侵监听程序