Dim i as integer, Heading1 as String

  Heading1 = "My Heading"
  me.HasHeading=true
  me.Heading(0) = Heading1

  for i = 1 to 20
    me.addrow""
    me.Cell(me.lastIndex,0)=str(i)
  next



_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>

Reply via email to