VB连接数据库执行存储过程出现“为过程或函数 指定了过多的参数”

存储过程：
ALTER procedure [dbo].[feng]
(@issue int,@num int output)
as
select @num=count(buy_number.issue)from buy_number ,elicit_number
where(
@issue=buy_number.issue
And buy_number.first = elicit_number.first
and buy_number.second=elicit_number.second
and buy_number.third=elicit_number.third)
代码段：
Me.sqlconnection1.ConnectionString = "Server=(local);Database=choujiang;User id=aaa;Pwd=aaa"
sqlcmd.Connection = Me.sqlconnection1
sqlcmd.CommandType = CommandType.Text
sqlcmd.CommandText = "dbo.feng"
sqlcmd.CommandType = CommandType.StoredProcedure
Dim num As SqlParameter = sqlcmd.Parameters.Add("@num", SqlDbType.Int)
Dim issue As SqlParameter = sqlcmd.Parameters.Add("@issue", SqlDbType.Int)
num.Direction = ParameterDirection.Output
issue.Direction = ParameterDirection.Input
issue.

VB中连接ACCESS数据库出现问题 sql数据库存储过程 数据库存储 过程怎么写！ 2005数据库的存储过程 怎么查看数据库存储过程 VB数据库怎么连接数据库 vb连接sqlserver2000数据库，出现“找不到指定的sqlserver”？ vb 2005 express连接access数据库时出现的对话框 vb 利用模块连接access数据库出现的问题 用VB连接数据库