.如果真 (表项信息.列 = 3)
.如果真 (表项信息.行 ≠ -1)
取表项坐标信息 (超级列表框1.取窗口句柄 (), 4096 + 16, 表项信息.行, 表项坐标) ' 取出当前表项行列坐标点
组合框1.顶边 = 超级列表框1.顶边 + 表项坐标.y + 1
组合框1.左边 = 表项坐标.x + 超级列表框1.左边
.如果真 (表项信息.列 = 0)
组合框1.左边 = 表项坐标.x + 超级列表框1.左边
.如果真结束
.计次循环首 (表项信息.列, i)
组合框1.左边 = 组合框1.左边 + 超级列表框1.取列宽 (i - 1)
.计次循环尾 ()
组合框1.宽度 = 超级列表框1.取列宽 (表项信息.列)
组合框1.内容 = 超级列表框1.取标题 (表项信息.行, 表项信息.列)
组合框1.可视 = 真
超级列表框1.禁止重画 ()
组合框1.获取焦点 ()
组合框1.被选择字符数 = -1 ' 全选中编辑框中的内容
下一篇 超级列表框导出xlsx数据