Ho risolto
Dim IP = System.Net.Dns.Resolve(sHostName).AddressList(0).T oString()
ciao
scuba