如何解决如何返回函数名
我是新来的,我想寻求帮助。
当前代码:
private con0 as new ADODB.connection
private con1 as new ADODB.connection
private con2 as new ADODB.connection
首选代码:
private function con(Byval i as integer) as ADODB.connection
' Code here
End sub
如何使它像下面这样工作。
con(1) as ADODB.Connection
去除多个con0、con2、con3 因为如果我只是使用代码
public con as ADODB.Connection
在多个命令中,但我需要建立第一个连接以保持打开状态,当 con 打开时出现无法执行的错误。但我不想使用当前代码。
解决方法
你想要这个:
Dim con(2) As ADODB.Connection
它声明了一个包含三个项目的数组。我真的希望这真的是 vb6 而不是 VB.Net。 没有充分的理由在 .Net 中使用旧的 ADODB
类型。如果你有 .Net,你想要这个:
Dim con(2) As System.Data.DbConnection
此外,拥有多个连接对象可能是错误的。如果您不知道什么是连接池,您可能想先阅读一下,因为 ADO 库已经自动为您管理了一个连接池。
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。