在VB中，可以使用ADO（ActiveX Data Objects）對象來調用存儲過程。下面是一個簡單的示例代碼：
Dim conn As Object
Set conn = CreateObject("ADODB.Connection")
conn.ConnectionString = "Provider=SQLOLEDB;Data Source=服務器名;Initial Catalog=數據庫名;User ID=用戶名;Password=密碼"
conn.Open
Dim cmd As Object
Set cmd = CreateObject("ADODB.Command")
cmd.ActiveConnection = conn
cmd.CommandType = adCmdStoredProc
cmd.CommandText = "存儲過程名"
' 設置存儲過程的參數
cmd.Parameters.Append cmd.CreateParameter("參數名", adInteger, adParamInput, , 參數值)
' 執行存儲過程
cmd.Execute
' 關閉連接
conn.Close
Set conn = Nothing
Set cmd = Nothing
在代碼中，你需要根據自己的實際情況修改連接字符串、存儲過程名以及參數值。同時，你還可以根據實際情況添加其他的參數。
注意：上述代碼中使用的是舊版的ADO（ADODB），在新版的.NET中，可以使用ADO.NET來調用存儲過程。
