Podemos quitar el puerto de una url con una expresión regular.
Declaramos una variable str de tipo string donde almacena la url
Dim str As String
str = http://www.mistrucos.net:80/truco-windows-visor-de-sucesos-650_1.htm
Declaramos una variable de tipo Regex (debemos importar la System.Text.RegularExpressions para poder trabajar con expresiones regulares)
Dim r As Regex
Dim aux As String
aux = r.Replace(str, ":[0-9]+", "")
:[0-9]+ es la expresión para eliminar los puertos.
Ya hemos eliminado los puertos de la url inicial:
http://www.mistrucos.net/truco-windows-visor-de-sucesos-650_1.htm