Visual Basic - Procedimiento almacenado

Como puedo ejecutar en visual basic un procedimiento almacenado de sql ?

Luego de crear las referencias al ADO:

Sub EjecutaSP(ByVal strNombreSP As String, ParamArray Parametros() As Variant)
Dim cn As New ADODB.Connection
cn.CursorLocation = adUseClient
cn.Open "DSN=MyODBC;uid=SA;"

Dim cmd As New ADODB.Command
Set cmd.ActiveConnection = cn
cmd.CommandText = strNombreSP
cmd.CommandType = adCmdStoredProc
cmd.Execute , Parametros()
End Sub