[C#]  
      string s ="";  
      .IPAddress[] addressList = Dns.GetHostByName(Dns.GetHostName()).AddressList; 
       for (int i = 0; i < addressList.Length; i ++) 
       { 
            s += addressList[i].ToString() + "\n";  
      } 
       textBox1.Text = s; 
  
 [VB.NET] 
  
      Dim s As String = ""  
      Dim addressList As .IPAddress() = Dns.GetHostByName(Dns.GetHostName()).AddressList 
  
      Dim i As Integer  
      For i = 0 To addressList.Length - 1  
           s += addressList(i).ToString() + ControlChars.Lf  
      Next i 
      textBox1.Text = s
  
  
 
 
                     
            
        













 
                    

 
                 
                    