vb.net 动态传参小结

发布时间：2020-12-17 07:48:49 所属栏目：百科来源：网络整理

导读：' Dim paramsCount As Integer = 1 ' Dim parameters(1) As IDataParameter ' If (Not carCd = Integer.MinValue) AndAlso (Not carCdSeqNo = Integer.MinValue) Then ' sql += SqlManager.GetSqlString("KYT003","SelectCarMst2") ' paramsCount += 1 ' ReD

' Dim paramsCount As Integer = 1
' Dim parameters(1) As IDataParameter

' If (Not carCd = Integer.MinValue) AndAlso (Not carCdSeqNo = Integer.MinValue) Then
' sql += SqlManager.GetSqlString("KYT003","SelectCarMst2")
' paramsCount += 1
' ReDim Preserve parameters(paramsCount)

' ’’’’’’’’’’’’’’’’’’作为参数的数据

' parameters(paramsCount) = adapter.CreateDataParameter("@CarCd")

' parameters(paramsCount).DbType = DbType.Int32

’’’’’’’’’’’’’’’’’’参数

' parameters(paramsCount).Value = carCd

' paramsCount += 1
' ReDim Preserve parameters(paramsCount)

’’’’’’’’’’’’’’’’’’作为参数的数据

' parameters(paramsCount) = adapter.CreateDataParameter("@CarCdSeqNo")

' parameters(paramsCount).DbType = DbType.Int32

' ’’’’’’’’’’’’’’’’’’参数

parameters(paramsCount).Value = carCdSeqNo

' End If

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!