ActiveReports3增加按钮的有关问题

ActiveReports3增加按钮的问题？
[size=12px][/size]最近使用了ACTIVEREPORTS，在网上看到了一段代码，很好的增加了一个“页面设置”的按钮：
Private Sub ActiveReport_Initialize()
  AR3.Toolbar.Tools.Add ("页面设置")
  SetPrintCHI Me
End Sub
Private Sub SetPrintCHI(Arvreport As Object)
  With Arvreport
  .Toolbar.Tools.Add "页面设置"
  .ToolbarVisible = True
  .Toolbar.DisplayToolTips = True

  .Toolbar.Tools(0).Caption = "目录"
  .Toolbar.Tools(0).Tooltip = "目录"

  .Toolbar.Tools(2).Caption = "打印"
  .Toolbar.Tools(2).Tooltip = "打印输出"

  .Toolbar.Tools(4).Caption = "缩小"
  .Toolbar.Tools(4).Tooltip = "预览缩小"
  .Toolbar.Tools(5).Caption = "放大"
  .Toolbar.Tools(5).Tooltip = "预览放大"

  .Toolbar.Tools(6).Tooltip = "放大百分比"
   
  .Toolbar.Tools(8).Caption = "上页"
  .Toolbar.Tools(8).Tooltip = "上一页"
  .Toolbar.Tools(9).Caption = "下页"
  .Toolbar.Tools(9).Tooltip = "下一页"
   
  .Toolbar.Tools(10).Tooltip = "页数"
   
  .Toolbar.Tools(12).Caption = "上一记录"
  .Toolbar.Tools(12).Tooltip = "上一记录"
  .Toolbar.Tools(13).Caption = "下一记录"
  .Toolbar.Tools(13).Tooltip = "下一记录"
   
  .Toolbar.Tools(14).Tooltip = "页面设置"
   
  End With

  End Sub
问题如下：
1：此段代码仅仅能增加一个按钮，如果我想再增加一个甚至多个按钮，代码应该如何写？
2：此段代码增加上去的是一个字符串，如果我想将其增加的代码改成好看的图标显示，那代码应该如何写？
谢谢各位
另外：有没有中文的ACTIVEREPORTS的中文的详细说明下载？


------解决方案--------------------
增加多个按钮,加一个For...Next循环

------解决方案--------------------
Private Sub SetPrintCHI(Arvreport As Object)
With Arvreport
.Toolbar.Tools.Add "页面设置" 

这里也要添上一行add

.Toolbar.Tools(14).Tooltip = "页面设置" 

后面加上一行(15)