VB获取本机计算机名及IP地址的源代码