Oracle的存储过程我没用过,但是我可以给你一个SQL SERVER 中的存储过程实例:
FindText是一个查找记录的存储过程,它反回的是一个记录集:
CREATE PROCEDURE FindText (@FindString Varchar(255))AS 
Begin
Select * From News Where InfoContent Like '%'+ @FindString+'%'
End以下是在中调用的程序例子
Dim db As ADODB.Connection
Dim rs As ADODB.Recordset
Set db = New ADODB.Connection
Set rs = New ADODB.Recordsetconnstring = "driver={sql server};uid=sa;pwd=;database=News;server=192.0.0.1"
db.Open connstringSet rs = db.Execute("FindText ' '")
'调用格式是一个参数与别一个参数用逗号分开
Do While Not rs.EOF
    MsgBox rs!infotitle
    rs.MoveNext
Loop
就这么多了,不知道行不行!