void ParametersDemo ( OleDbConnection myConn,
      string query, OleDbParameter [ ] myParamArray ) {
   OleDbCommand myCommand = new OleDbCommand ( query, myConn );
   myCommand.CommandText = "SELECT CustomerID, CompanyName FROM Customers " +
      "WHERE Country = @Country AND City = @City";

   myCommand.Parameters.Add ( myParamArray );

   for ( int j = 0; j < myParamArray.Length; j++ ) {
      myCommand.Parameters.Add ( myParamArray [ ] );
   }

   string myMessage = "";
   for ( int i = 0; i < myCommand.Parameters.Count; i++ ) {
      myMessage += myCommand.Parameters [ ].ToString ( ) + "<br>";
   }
   Response.Write ( myMessage );
}

Public Sub ParametersDemo ( myConn As OleDbConnection, _
      query As String, myParamArray ( ) As OleDbParameter )
   Dim myCommand As New OleDbCommand ( query, myConn )
   myCommand.CommandText = "SELECT CustomerID, CompanyName FROM Customers " & _
      "WHERE Country = @Country AND City = @City"

   myCommand.Parameters.Add ( myParamArray )
   Dim j As Integer
   For j = 0 To myParamArray.Length - 1
      myCommand.Parameters.Add ( myParamArray ( j ) )
   Next j
   Dim myMessage As String = ""
   Dim i As Integer
   For i = 0 To myCommand.Parameters.Count - 1
      myMessage += myCommand.Parameters ( i ).ToString ( ) & ControlChars.Cr
   Next i
   Response.Write ( myMessage )
End Sub