主题：请教一个存储过程返回值的问题

Cnn.Open()

Dim adoCmd As New System.Data.SqlClient.SqlCommand("select_bom", Cnn)
'Dim adoCmd As New Data.OleDB.OleDbCommand("Select_bom", Cnn)
adoCmd.CommandType = System.Data.CommandType.StoredProcedure

adoCmd.Parameters.Add("@number_bom", System.Data.SqlDbType.NVarChar,255)

adoCmd.Parameters("@number_bom").Value ="1232-2-1"

adoCmd.Parameters.Add("@result", System.Data.SqlDbType.Int)

adoCmd.Parameters.Add("@ReturnValue", System.Data.SqlDbType.Int).Direction = System.Data.ParameterDirection.ReturnValue
adoCmd.Parameters("@result").Direction = System.Data.ParameterDirection.Output
adoCmd.ExecuteNonQuery()

output.show(adoCmd.Parameters("@ReturnValue").Value.ToString())
output.show(adoCmd.Parameters("@result").Value.ToString())