void SqlCommandPrepareEx ( ) {
   int  id = 20;
   string  desc = "myFirstRegion" ;
   SqlConnection myConn = new SqlConnection (
      "server=localhost; uid=sa; pwd=; database=northwind" );
   myConn.Open ( );
   SqlCommand myCmd = new SqlCommand ( null, myConn );

   // set up insert myCmd ...
   myCmd.CommandText = "insert into Region ( RegionID, RegionDescription )
      values ( @id, @desc ) " ;
   myCmd.Parameters.Add ( "@id", id );
   myCmd.Parameters.Add ( "@desc", desc );

   // calling Prepare after having setup commandtext and params.
   myCmd.Prepare ( );  
   myCmd.ExecuteNonQuery ( );

   // change param values and call execute. This time the prepared myCmd will be executed.
   myCmd.Parameters [ 0 ].Value = 21;
   myCmd.Parameters [ 1 ].Value = "mySecondRegion";
   myCmd.ExecuteNonQuery ( );
}

Public Sub SqlCommandPrepare ( )
   Dim id As Integer = 20
   Dim desc As String = "myFirstRegion"
   Dim myConn As SqlConnection = New SqlConnection ( _
      "server=localhost; uid=sa; pwd=; database=northwind" )
   myConn.Open ( )
   Dim myCmd As New SqlCommand ( "", myConn )

   ' set up insert myCmd ...
   myCmd.CommandText = "insert into Region ( RegionID, RegionDescription ) _
      values ( @id, @desc ) "
   myCmd.Parameters.Add ( "@id", id )
   myCmd.Parameters.Add ( "@desc", desc )

   ' Calling Prepare after having setup commandtext and params.
   myCmd.Prepare ( )
   myCmd.ExecuteNonQuery ( )

   ' Change param values and call execute. This time the prepared myCmd will be executed.
   myCmd.Parameters ( 0 ).Value = 21
   myCmd.Parameters ( 1 ).Value = "mySecondRegion"
   myCmd.ExecuteNonQuery ( )
End Sub