VB编写的根据机器名获取IP地址的例子。简单实用。