1.怎么把x轴下标0 1 2 3 4 5 改为“滨湖”“湖光”“担子山”“商业街”“跃进桥”“未归类”，前提是统计表里改不了名  有办法在生成统计图电时候改吗？

2.怎么添加统计图x和y轴的标题？

简单：

http://www.foxtable.com/webhelp/scr/0968.htm

http://www.foxtable.com/webhelp/scr/1032.htm

多谢  可随之又遇到新问题了   我用窗口设计里的TopicBar任务栏  把代码都写在TopicLinkClick里  格式为：

Select Case e.Link.Name
    Case "增加"
        \'在此加入相应的代码
    Case "移动"
        \'在此加入相应的代码
    Case "删除"
        \'在此加入相应的代码
    Case "主页"
        \'在此加入相应的代码
End Select

但不同按键也就不同case之间但代码回相互影响，比如：第一次按“月统计”但时候是正常但先按“地区统计”再按“月统计”后就出现设置影响了  如图

想问下生成统计表都时候选择了自动生成汇总模式   可用代码生成excel报表时下面那行汇总却没有   有办法解决吗

用都代码是：

Dim b As New XLS.Book
Dim t As Table = Tables("统计表")
Dim s As XLS.Sheet = b.Sheets(0)
Dim Chart As WinForm.Chart = Forms("窗口1").Controls("Chart1")
For c As Integer = 0 To t.Cols.Count -1 \'添加列标题
    s(0, c).Value = t.Cols(c).Name
Next
For r As Integer = 0 To t.Rows.Count - 1 \'填入数据
    For c As Integer = 0 To t.Cols.Count -1
        s(r +1, c).Value = t.rows(r)(c)
    Next
Next
\'插入图表
s(t.rows.Count + 2,1).Value = New XLS.Picture(Chart.Image,0,0,422,258)
b.Save("c:\\reports\\test.xls")
Dim Proc As New Process
Proc.File = "c:\\reports\\test.xls"
Proc.Start()

方法一：直接saveExcel

http://www.foxtable.com/webhelp/scr/0559.htm

方法二：用分组模板

http://www.foxtable.com/webhelp/scr/1542.htm