Visual Basic - No resulvo este problema de visual basic

Buenos dias a todos espero que me ayuden en este problema, saben he estado tratando de resolver este problema de visual basic pero no encuentro cual es la falla, este programa es para convertir equivalencias de metros a centimetros, pulgadas, pies y yardas asi que lo pongo aqui:

Dim metros As Double, pies As Double, pulgadas As Double
Dim yardas As Double, centimetros As DragConstants
Private Sub cmdConvertir_Click()
On Error GoTo Error
centimetros = Val(txtMetros.Text) * 100
pulgadas = centimetros / 2.54
pies = pulgadas / 12: yardas = pies / 3
txtSalida.Text = "Centimetros :" & _
Str(Format(centimetros, "#####.##")) + & _
vbCrLf & "Pulgadas :" + Str(Format(pulgadas, "#####.##")) & _
vbCrLf & "Pies : " + Str(Format(pies, "#####.##")) + vbCrLf & _
"Yardas :" + Str(Format(yardas, "#####.##"))
Exit Sub
Error:
MsgBox Err.Description, vbCritical, "Erro número:" & Err.Number
End Sub

El problema surge en las filas siguientes:

txtSalida.Text = "Centimetros :" & _
Str(Format(centimetros, "#####.##")) + & _
vbCrLf & "Pulgadas :" + Str(Format(pulgadas, "#####.##")) & _
vbCrLf & "Pies : " + Str(Format(pies, "#####.##")) + vbCrLf & _
"Yardas :" + Str(Format(yardas, "#####.##"))

Esta filas se marcan de rojo y me manda mensaje de error
no lo se por que pero estoy tratando de resolver.
Alguna sugerencia. Gracias de antemano.

Hola
Tenés que quitar el [+] en:
Str(Format(centimetros, "#####.##")) + &
Por otra parte te conviene sustituir los Signos ¨[+] en el resto de la línea por [&]
Saludos cordiales

Gracias Juan carlos por la respuesta fue precisa y ahora todo esta bien, gracias por el consejo Pedro luis un saludo para argentina.

Hola
Tenés que quitar el [+] en:
Str(Format(centimetros, "#####.##")) + &
Por otra parte te conviene sustituir los Signos ¨[+] en el resto de la línea por [&]
Saludos cordiales

Además aunque no es un error es una redundancia el Str(Format)), el Format ya te da un string.