VB 调 SQLSERVER 存储过程卡壳, 请高手帮忙!该怎么解决

VB 调 SQLSERVER 存储过程卡壳, 请高手帮忙!
VB调用一个SQLSERVER   的存储过程,   数据表以参数的形式传递,   目的是获取这个表的最大ID值,   如下
CREATE   PROCEDURE   GetMaxID(@TableName   varchar(50))
AS
EXEC   ( 'SELECT   MAX(ID)   FROM   '   +   @TableName)

现在我在VB如何获取这个查询的返回值?   也就是MAX(ID)?

------解决方案--------------------
dim sql as string
sql= "exec GetMaxID '表名 ' "
Dim re As New ADODB.Recordset
re.Open sql, 连接字符串