|
2精币
.版本 2
.支持库 mysql
.支持库 iext
.如果真 (执行SQL语句 (全局_数据库句柄, “select * from ” + #常量_图表统计 + “ order by `年份`,`月份`,`日`”) = 假)
信息框 (“数据库查询失败!”, #错误图标, )
返回 ()
.如果真结束
输出调试文本 (“select * from ” + #常量_图表统计 + “ order by `年份`,`月份`,`日`”)
局部_记录集 = 取记录集 (全局_数据库句柄)
到首行 (局部_记录集)
.计次循环首 (取记录集行数 (局部_记录集), 局部_计次)
读字段值 (局部_记录集, “id”, 局部_ID)
读字段值 (局部_记录集, “年份”, 局部_年份)
读字段值 (局部_记录集, “月份”, 局部_月份)
读字段值 (局部_记录集, “日”, 局部_日)
读字段值 (局部_记录集, “园地名称”, 局部_园地名称)
读字段值 (局部_记录集, “品种分类”, 局部_品种分类)
读字段值 (局部_记录集, “品种名称”, 局部_品种名称)
读字段值 (局部_记录集, “种植数量”, 局部_种植数量)
读字段值 (局部_记录集, “收入数量”, 局部_收入数量)
读字段值 (局部_记录集, “单位重量”, 局部_单位重量)
读字段值 (局部_记录集, “收入合计”, 局部_收入合计)
局部_索引 = 超级列表框_收入信息.插入表项 (, 到文本 (局部_计次), , , , 局部_ID)
局部_日期 = 局部_年份 + “-” + 局部_月份 + “-” + 局部_日
超级列表框_收入信息.置标题 (局部_索引, 1, 局部_日期)
超级列表框_收入信息.置标题 (局部_索引, 2, 局部_园地名称)
超级列表框_收入信息.置标题 (局部_索引, 3, 局部_品种分类)
超级列表框_收入信息.置标题 (局部_索引, 4, 局部_品种名称)
超级列表框_收入信息.置标题 (局部_索引, 5, 到文本 (局部_种植数量))
超级列表框_收入信息.置标题 (局部_索引, 6, 到文本 (局部_收入数量))
超级列表框_收入信息.置标题 (局部_索引, 7, 到文本 (局部_单位重量))
超级列表框_收入信息.置标题 (局部_索引, 8, 到文本 (局部_收入合计))
到下一行 (局部_记录集)
.计次循环尾 ()
|
最佳答案
查看完整内容
局部_索引 = 超级列表框_收入信息.插入表项 (, 到文本 (局部_计次), , , , 局部_ID)'这句让参数空着就好,
局部_索引 = 超级列表框_收入信息.插入表项 (,,,,)
超级列表框_收入信息.置标题 (局部_索引, 0, 文本)'l置标题第一句,列索引从0开始
如果要给局部_索引赋值,超级列表框_收入信息.插入表项 ()就不要填参数,如果填参数,就不要给表项索引赋值,直接:
超级列表框_收入信息.插入表项 (, 到文本 (局部_计次), , , , 局部_ ...
|