怎么在VB里面实现这种情况

事件探查器跟踪出来是这样的。
declare @P1 int
set @P1=180150000
declare @P2 int
set @P2=8
declare @P3 int
set @P3=1
declare @P4 int
set @P4=1
exec sp_cursoropen @P1 output, N'SELECT aa.cbegind_c, aa.mb, aa.md, aa.mc, aa.cendd_c, aa.me FROM g_accsum aa WHERE aa.ccode like ''1001%'' and (select cc.bend from code cc where cc.ccode=aa.ccode)=1 and aa.iperiod=5', @P2 output, @P3 output, @P4 output
select @P1, @P2, @P3, @P4

请问下在VB里面怎么实现？ --------------------编程问答-------------------- 实现什么？存储过程吗？ --------------------编程问答-------------------- 这个存储过程应该不是写在数据库里面的 --------------------编程问答-------------------- 是程序里面生成的

补充：VB ,  数据库(包含打印，安装，报表)