procedure stockée qui return

slt ,je suis en train de développé en vb net,j'ai créé une procédure stockée,je voudrai l'appeler mais çà ne marche pas.Voici le code pour l'appel :
Private Sub ID_CarburantComboBox_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ID_CarburantComboBox.SelectedIndexChanged
Dim cs As New SqlConnection _
(Global.Gestion_aosis_elton.My.Settings.MConnectionString)
Dim com As New SqlCommand("fdprix")
com.CommandType = CommandType.StoredProcedure
com.Parameters.Add("@Produit", SqlDbType.Text).Value = ID_CarburantComboBox.Text
cs.Open()
Dim rd As SqlDataReader = com.ExecuteReader()
If rd.Read Then
Me.Prix_venteTextBox.Text = rd.GetDouble(0)
rd.Close()

End If
cs.Close()
end sub.

Aider moi svp