Visual Basic.NET - añadir un salto de linea o "enter" a un string

Dim Velocidadkh As Double

        Dim Velocidadms As Double

        distancia = txtdistancia.Text

        tiempo = txttiempo.Text

        Velocidadkh = Val(distancia) / Val(tiempo)

        Velocidadms = Val(Velocidadkh) * Val(18 / 5)

        lblresultado.Text = "La velocidad es " & Val(Velocidadkh) & " km/h" & vbCrLf & _

            "La velocidad es " & Val(Velocidadms) & " m/s"

    End Sub

    Private Sub cmdsalir_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmdsalir.Click

        MsgBox("Gracias por utilizar nuestro programa de cáclulo de velocidad")

        Me.Hide()

    End Sub

    Private Sub cmdnuevo_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmdnuevo.Click

        txtdistancia.Text = ""

        txttiempo.Text = ""

        lblresultado.Text = "El resultado de esta operación es:"

        txtdistancia.Focus()

    End Sub

End Class