object变量后期绑定OleDbCommand重载决策失败,因为没有可访问的Parameters接受此数目的参数。如何解决?

本人用VB.NET,代码如下:

Dim OleDbParameter1 As Object
OleDbParameter1 = New System.Data.OleDb.OleDbParameter
OleDbParameter1.SourceColumn = "TEST1"
OleDbParameter1.ParameterName = "TEST1"

Dim OleDbCommand1 As Object = Nothing
OleDbCommand1 = New System.Data.OleDb.OleDbCommand
MsgBox(OleDbCommand1.Parameters.Count) '返回0

OleDbCommand1.Parameters.Add(OleDbParameter1)
MsgBox(OleDbCommand1.Parameters.Count) '返回1

MsgBox(OleDbCommand1.Parameters(OleDbCommand1.Parameters.Count - 1).ParameterName) '重载决策失败,因为没有可访问的Parameters接受此数目的参数。

因为我的数据来源复杂,必须采取Object变量在后期绑定,请指教怎样解决上述问题?

OleDbCommand1.Parameters.IndexOf(OleDbCommand1.Parameters.Count - 1)