ot;MyStoredProc ''''Davolio''''", oCN)
oCMD.CommandType = CommandType.StoredProcedure
Try
oCN.Open()
oCMD.Execute(oDR)
While oDR.Read
Console.WriteLine(oDR("LastName").ToString))
End While
Catch e As Exception
Console.WriteLine(e.ToString)
Finally
oDR.Close()
oCN.Close()
End Try
请注意,上述代码具有 Microsoft Visual Basic® 7.0 引入的一些语法元素的特征 — 特别是最终取代了 On Error 机制的 Try-Catch 结构。ADO+ 代码充分利用了提供诸如 Console 之类的系统对象的.NET 运行时服务。