Sos Pasar Parametros - Ahora con una colección

Que tal compañeros, la duda es la siguiente...

Requiero crear una colección de parametros y despues
pasarla a un objeto command; pero no he logrado llevarlo
a cabo.

He intentado hacerlo de la siguiente manera

Dim ColeccionParametros As OleDb.OleDbParameterCollection

For Each Control In Controls
If Control.GetType.Name = "TextBox" Then
Parametro.ParameterName = Control.Tag
Parametro.Value = Control.Text
ColeccionParametros.Add(Parametro)
End If
Next

Despues de este codigo lo que pretendo hacer es leer la
coleccion de parametros y irla adicionando al Command
pero me genera el siguiente error

Excepción no controlada del
tipo 'System.NullReferenceException' en Sitall.exe

Información adicional: Referencia a objeto no establecida
como instancia de un objeto.

Gracias