.Net中使用带返回值的存储过程(VB代码)

    Function GetYFJEDX(ByVal yfje As Decimal) As String
        Dim fkjedx As String
        Dim myCMD As SqlClient.SqlCommand = New SqlClient.SqlCommand("MoneytoChinese22", sqlconn)

        myCMD.CommandType = CommandType.StoredProcedure
        myCMD.Parameters.Add(New SqlClient.SqlParameter("@ChangeMoney", SqlDbType.Money))
        myCMD.Parameters("@ChangeMoney").Value = yfje
        myCMD.Parameters.Add(New SqlClient.SqlParameter("@ReturnDaXie", SqlDbType.VarChar, 50))
        myCMD.Parameters("@ReturnDaXie").Direction = ParameterDirection.Output
        'sqlAdapter.Fill(sqlDs, "fkjedx_CX")
        sqlconn.Open()
        myCMD.ExecuteNonQuery()
        sqlconn.Close()
        fkjedx = myCMD.Parameters("@ReturnDaXie").Value
        Return fkjedx
    End Function