vb怎样调用sql的存储过程

'// 创建一个对象，我们用来调用存储过程 Set adoComm = CreateObject("ADODB.Command") With adoComm '// 设置连接，假设 adoConn 为已经连接的 ADODB.Connection 对象 .ActiveConnection = adoConn '// 类型为存储过程，adCmdStoredProc = 4 .CommandType = 4 '// 存储过程名称 .CommandText = "你的存储过程名称" '// 设置输入参数 .Parameters.Item("@输入参数").Value = "值" '// 执行存储过程 .ExecuteIf .Parameters.Item("@返回参数名称").Value = True ThenElseEnd IfEnd With'// 释放对象 Set adoComm = Nothingvb.net:Dim myCommand As New SqlClient.SqlCommand myCommand.CommandType = CommandType.StoredProcedure myCommand.CommandText = ProcName myCommand.Connection = myConn '定义一个数据适配器，并设置参数 Dim myDapter As New SqlClient.SqlDataAdapter(myCommand) myDapter.SelectCommand.Parameters.Add("@name", SqlDbType.VarChar, 20).Value = Param1 '定义一个数据集对象，并填充数据集