OleDbParameter variable = OleDbParameterCollection.Item [ index ];
... or ...
OleDbParameter variable = OleDbParameterCollection [ index ];

dim variable as OleDbParameter = OleDbParameterCollection.Item ( index )
... or ...
dim variable as OleDbParameter = OleDbParameterCollection ( index )

variable : OleDbParameter = OleDbParameterCollection.Item ( index );
... or ...
variable : OleDbParameter = OleDbParameterCollection ( index );

public void CreateOleDbParamColl ( OleDbCommand myCmd ) {
   OleDbParameterCollection myParams = myCmd.Parameters;
   string myParamNames = "";

   for ( int i=0; i < myParams.Count; i++ ) {
      myParamNames += myParams [ i ].ToString ( ) + "\n";
   }
   MessageBox.Show ( myParamNames );
}

Public Sub CreateOleDbParamColl ( myCmd As OleDbCommand )
   Dim myParams As OleDbParameterCollection = myCmd.Parameters
   Dim myParamNames As String = ""
   Dim i As Integer
   For i = 0 To myParams.Count - 1
      myParamNames += myParams ( i ).ToString ( ) + ControlChars.Cr
   Next i
   MessageBox.Show ( myParamNames )
End Sub