| 发表于:2007-02-04 00:29:362楼 得分:12 |
imports system.net public class form1 private sub form1_load(byval sender as system.object, byval e as system.eventargs) handles mybase.load dim hostnameoraddress as string dim returnvalue as ipaddress() hostnameoraddress = "community.csdn.net " returnvalue = dns.gethostaddresses(hostnameoraddress) me.text = returnvalue(0).tostring end sub end class | | |
|