Visual Basic.NET - En vez del dato del campo muestra "Entidad.Campo"

Estoy capturando el valor de unos campos en función del índice respectivo de cada uno de ellos pero lo que me muestra es ENTIDAD.Nombre del campo, cuando en la DAL en el "Return Result" lo muestra correctamente.

Adjunto código y formulario.

BLL
Public Function BuscaDato(campo As String, texto As String) As Contactos
Dim objContacto As New DAOContacto
Try
Return objContacto.BuscaDato(campo, texto)
Catch ex As Exception
Throw New Exception(ex.Message)
End Try
End Function

DAL
Public Function BuscaDato(campo As String, texto As String) As Contactos
Dim Result As Contactos = Nothing
Try
Using Conn As New SqlConnection(Conexion.ConnectionString)
Conn.Open()
Dim sql = String.Empty
Select Case campo
Case "Contacto"
sql = "Select * From Contactos Where IdContacto = @texto"
End Select
Result = Conn.QueryFirstOrDefault(Of Contactos)(sql, New With {texto})
End Using
Return Result
Catch ex As Exception
Throw New Exception(ex.Message)
End Try
End Function

PRESENTACIÓN
Private Sub MuestraDatos(vProveedor As Proveedor)
txtIdProveedor.Text = vProveedor.IdProveedor.ToString()
txtIdContacto.Text = vProveedor.IdContacto.ToString()
txtIdServicio.Text = vProveedor.IdServicio.ToString()
txtIdCp.Text = vProveedor.IdCp.ToString
txtNombre.Text = vProveedor.Nombre
txtNif.Text = vProveedor.Nif
txtDirección.Text = vProveedor.Dirección
txtContacto.Text = Convert.ToString(objContacto.BuscaDato("Contacto", vProveedor.IdContacto))
txtServicio.Text = Convert.ToString(objServicio.BuscaDato("Servicio", vProveedor.IdServicio))
txtMunicipio.Text = Convert.ToString(objMuni.BuscaDato("Municipio", vProveedor.IdCp))
txtCp.Text = Convert.ToString(objMuni.BuscaDato("Municipio", vProveedor.IdCp))
txtProvincia.Text = objProvincia.BuscaDato("Provincia", Microsoft.VisualBasic.Left(txtCp.Text, 2))
txtCodigo.Text = objProvincia.BuscaDato("Provincia", Microsoft.VisualBasic.Left(txtCp.Text, 2))
End Sub

Puede alguien decirme porque me saca esto así.

Gracias

• Proveedores.zip(166,4 KB)

Ya está arreglado.

Gracias