SP que devuelve parametros

hize lo siguiente con este procedimiento almacenado, pero no devuelve valores, la verdad no encuentro el error en todo caso algun manual donde se recupere valores de un procedimiento almacenado gracias Dim iCArea as integer = 2 Dim iCSArea as integer = 5 Dim Cnx As New SqlConnection(sConexion) Dim Cmd As New SqlCommand("dbo.spFiltrarAreaSArea", Cnx) Cmd.CommandType = CommandType.StoredProcedure Cnx.Open() Dim Parametro(3) As SqlParameter Parametro(0) = New SqlParameter("@Area", Me.iCArea) Parametro(0).Direction = ParameterDirection.Input Parametro(1) = New SqlParameter("@sArea", Me.iCSArea) Parametro(1).Direction = ParameterDirection.Input Parametro(2) = New SqlParameter("@NomArea", SqlDbType.VarChar, 100) Parametro(2).Direction = ParameterDirection.Output Parametro(3) = New SqlParameter("@NomSArea", SqlDbType.VarChar, 100) Parametro(3).Direction = ParameterDirection.Output With Cmd For i As Integer = 0 To Parametro.Length - 1 .Parameters.Add(Parametro(i)) Next End With Cmd.ExecuteScalar() MessageBox.Show(CStr(Parametro(2).Value.ToString)) el codigo del procedimiento [spFiltrarAreaSArea] @Area int, @sArea int, @NomArea Varchar(100) output, @NomSArea Varchar(100) output as Select Area.IdArea As Id, Area.NombreArea As Area, SubArea.idSArea As Id, SubArea.NombreSArea As 'Sub Area' From Area Inner join SubArea On SubArea.IdArea = Area.IdArea where Area.IdArea = @Area And SubArea.idSArea = @Sarea