Visual Basic.NET - Paramentro de salida

Dim slqcomand As New SqlClient.SqlCommand
slqcomand.Connection = New SqlClient.SqlConnection(sCnn)

slqcomand.CommandType = CommandType.StoredProcedure
slqcomand.CommandText = "Via_BuscarPacienteRut"
slqcomand.Parameters.Add("@RRUT", SqlDbType.Char)
slqcomand.Connection = New SqlClient.SqlConnection(sCnn)
slqcomand.Connection.Open()
slqcomand.ExecuteScalar()
ficha = slqcomand.Parameters("@Ficha").Value
y no me sale ningun dato esta Bien???
* Ademas puedo agragar que son mas de un dato que trae

Porque usas el ExecuteScalar?.
El ExecuteScalar ejecuta un comando, y devuelve el valor numérico(escalar) del primer campo del primer registro.

Eso es lo que quieres traer?, debes asignarlo a una variable:
Total=slqcomand.ExecuteScalar()
No te puede quedar asi solo: slqcomand.ExecuteScalar()

Si quieres devolver los registros debes ejecutar el comando ExecuteReader()