Public Overloads Sub CopyTo( _
   ByVal array As Array, _
   ByVal index As Integer _
) 

Dim instance As SmartPrintRulesCollection
Dim array As Array
Dim index As Integer
 
instance.CopyTo(array, index)

public void CopyTo( 
   Array array,
   int index
)

FarPoint.Web.Spread.SmartPrintRulesCollection rules = new FarPoint.Web.Spread.SmartPrintRulesCollection();
FarPoint.Web.Spread.SmartPrintRule spr;
spr = new FarPoint.Web.Spread.BestFitColumnRule(FarPoint.Web.Spread.ResetOption.None);
rules.Add(new FarPoint.Web.Spread.LandscapeRule(FarPoint.Web.Spread.ResetOption.None));
rules.Add(new FarPoint.Web.Spread.ScaleRule(FarPoint.Web.Spread.ResetOption.None, 1, 2, 0.5f));
rules.Add(spr);
object[] myarray = new Object[] {0, 1, 2};
rules.CopyTo(myarray, 0);
string msg = ("The name of the first rule in the collection is " + Convert.ToString(myarray[0].ToString()));
Response.Write(("<script language=\'javascript\'>alert(\'" 
                + (msg + "\')</script>")));

Dim rules As New FarPoint.Web.Spread.SmartPrintRulesCollection
Dim spr As FarPoint.Web.Spread.SmartPrintRule
spr = New FarPoint.Web.Spread.BestFitColumnRule(FarPoint.Web.Spread.ResetOption.None)
rules.Add(New FarPoint.Web.Spread.LandscapeRule(FarPoint.Web.Spread.ResetOption.None))
rules.Add(New FarPoint.Web.Spread.ScaleRule(FarPoint.Web.Spread.ResetOption.None, 1, 2, 0.5))
rules.Add(spr)
Dim myarray(rules.Count())
rules.CopyTo(myarray, 0)

Dim msg As String = "The name of the first rule in the collection is " & Convert.ToString(myarray(0).ToString())
Response.Write("<script language='javascript'>alert('" & msg & "')</script>"