主题：求助：下列FOXTABLE文件中“课时变化”表中的“正课统计”按纽公式如何设置？

因为已经没有“/”分隔符的处理，j值循环就可以取消了。即使循环也只是循环一次，也用不上Length了。
请去掉 “ for j as integer =0 to (drkc(dckc)).Length - 1”         和  对应的next语句。                               
修改一条语句：if drkc(dckc) <> "" then
                                                                                                

再次求教袁老师：“将课表转化为数据库”中遇到特殊问题-----《甘孜班补课表》，不知该怎样处理，请老师指点。

“性质”列说明：该课表每一轮补课分三大类：守班（周六下午、周六晚上、周日上午）、补课（周日下午）、巡查，故性质分为三类：甘孜守班，甘孜补课，甘孜巡查。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:甘孜班补课问题.table

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:甘孜班补课问题.table

这几次的交叉表到数据表的转换,需求只是有细微变化，根据表名的规律结合字符串应用,通过FOR EACH遍历操作即可完成。

谢谢袁老师！

      将该文件嵌入设计中老是报出错,请袁老师帮看一下邮箱中文件"甘孜班课时统计"按纽公式.谢谢!
      (由于在网吧上网,安装不上FOXTBLE,此时无法将文件放上网,邮箱文件中其它问题已解决.)

 问题在以下2句中。因为表的“日期”列中没有分隔符"_"，所以在split("_")(1)就超出了范围。它只能取split("_")(0)。

for Each dc as Datacol In DataTables("课时变化").Datacols

dim xz as string =dc.name.split("_")(1)

在dim xz as string =dc.name.split("_")(1)之前增加一个判断即可,即:
for Each dc as Datacol In DataTables("课时变化").Datacols
    if dc.name.IndexOf("_") >0 then   
       dim xz as string =dc.name.split("_")(1)  
    ...

    end if
...
       

谢谢指点！