Tämä näyttää IP:n ja Koneen nimen, lisää Winsock. Helppo tehä...
Private Sub Form_Load() MsgBox "Sinun IP on: " & Winsock1.LocalIP, vbInformation, "IP" MsgBox "Sinun Hostname on: " & Winsock1.LocalHostName, "Hostname" End End Sub
Aihe on jo aika vanha, joten et voi enää vastata siihen.