vb.net 怎么获得sql的存储过程的返回值

[qq03sj04]

sql的存储过程如下:
CREATE PROCEDURE beifenyn
@tjyear char(4)
AS
declare @name char(13)
set @name='gerengzze'+@tjyear
if exists(select name from sysobjects where xtype='u'
and name=@name)
return 0
else
return
1
GO
vb.net调用存储过程的代码:
Dim tjyear As String
tjyear = Trim(Me.TextBox1.Text)
Dim cn As New Data.SqlClient.SqlConnection(My.Settings.gzkbfConnectionString)

Dim sqlccgcyn As New Data.SqlClient.SqlCommand("beifenyn", cn)
sqlccgcyn.CommandType = Data.CommandType.StoredProcedure
sqlccgcyn.Parameters.Add("@tjyear", Data.SqlDbType.Char, 4).Value = tjyear
cn.Open()
sqlccgcyn.ExecuteNonQuery()
cn.Close()
我现在想获得存储过程的返回值,把返回值赋给一个变量,代码该怎么改?

[Ny-6000]

[Quote=引用 2 楼 MSTOP 的回复:]
不在SQL SERVER 里贴过了?这里还有?

Dim tjyear As String
tjyear = Trim("")
Dim cn As New Data.SqlClient.SqlConnection("")

Dim sqlccgcyn As New Data.SqlClient.SqlCommand("beifenyn", cn)
sqlccgcyn.CommandType = Data.CommandType.StoredProcedure
sqlccgcyn.Parameters.Add("@tjyear", Data.SqlDbType.Char, 4).Value = tjyear

D…
[/Quote]
说得对。！

[feiyun0112]

CMD.Parameters.Add(New SqlParameter(@return, SqlDbType.Int))
CMD.Parameters(@return).Direction = ParameterDirection.ReturnValue

CMD.ExecuteNonQuery()
bln = CMD.Parameters(@return).Value.ToString()





*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码)
http://feiyun0112.cnblogs.com/

[华芸智森]

不在SQL SERVER 里贴过了?这里还有?

Dim tjyear As String
tjyear = Trim("")
Dim cn As New Data.SqlClient.SqlConnection("")

Dim sqlccgcyn As New Data.SqlClient.SqlCommand("beifenyn", cn)
sqlccgcyn.CommandType = Data.CommandType.StoredProcedure
sqlccgcyn.Parameters.Add("@tjyear", Data.SqlDbType.Char, 4).Value = tjyear

Dim V As New SqlClient.SqlParameter
V.Direction = ParameterDirection.ReturnValue
sqlccgcyn.Parameters.Add(V)

cn.Open()
sqlccgcyn.ExecuteNonQuery()

MsgBox(V.Value)

cn.Close()