主题：[求助]为什么列名改不了呢？

 如下程序，希望在查完数据后，把Table24104列标题改了。可实际上是改不了的,如何解决？ 
        Dim dp3 As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker3")
        Dim dp4 As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker4")
        dp4.value=Date.Today
        dp3.value=Date.Today.AddDays(-30)
        DataTables("XXXX").LoadFilter="标识='QA' AND 日期>=#" & dp3.value &  "#  And 日期<=#" & dp4.value & “#"
        DataTables("XXXX").Loadtop=""
        DataTables("XXXX").Load
        Tables(e.Form.Name & "_Table2").AutoSizeCols

        Tables(e.Form.Name & "_Table2").Cols("制程编号").Caption="交单编号"
        Tables(e.Form.Name & "_Table2").Cols("QC板数").Caption="QA板数"
        Tables(e.Form.Name & "_Table2").Cols("QC批次").Caption="QA批次"

Tables(e.Form.Name & "_Table2").Cols("制程编号").Caption="交单编号"
Tables(e.Form.Name & "_Table2").Cols("QC板数").Caption="QA板数"
Tables(e.Form.Name & "_Table2").Cols("QC批次").Caption="QA批次"

Tables(e.Form.Name & "_Table2").BuildHeader