Strange error & is not a...

See more:

C#

VB

I have experienced a error from a converter code from C# I converted it to VB because I am not a C# programmer, here is the code:

  Private Sub sendTrace()
      Dim pingSender As New Ping()
      Dim options As New PingOptions()
      Dim ttl As Integer = 1
      options.DontFragment = True
      Dim IPs As IPAddress() = Nothing
      Try
          IPs = Dns.GetHostEntry(hostbox.Text.Trim()).AddressList
      Catch e As SocketException
          Update_Button(sendit, True)
          Update_Button(stopit, False)
          SetText(results, e.Message + vbCr & vbLf)
          Return
      End Try

      Dim hops As Integer = 0, timeout As Integer = 0
      Try
          hops = Convert.ToInt32(databox.Text.Trim())
          timeout = Convert.ToInt32(databox2.Text.Trim())
      Catch e As FormatException
          Update_Button(sendit, True)
          Update_Button(stopit, False)
          SetText(results, e.Message + vbCr & vbLf)
          Return
      End Try

      SetText(results, "-----------------------------------" & vbCr & vbLf & "Tracing route to " + hostbox.Text + " [" + IPs(0) + "]" & vbCr & vbLf)  < ERROR HERE

      While traceing AndAlso ttl <= hops
          Dim reply As PingReply = Nothing
          options.Ttl = ttl
'   ...............................................deleted code. because too long
  End Sub

The error is

<pre>
       SetText(results, "-----------------------------------" &amp; vbCr &amp; vbLf &amp; "Tracing route to " + hostbox.Text + " [" + IPs(0) + "]" &amp; vbCr &amp; vbLf)

Error 4 Operator '&' is not defined for types 'String' and 'System.Net.IPAddress'.