
这种列程应该比较多吧,我最近想写的一个软件也有这个功能 附上源码你参考下吧
版本 2支持库 iext
程序集 起动窗口程序集
子程序 __启动窗口_创建完毕
判断开始 (外部数据库1打开MDB数据库 (取运行目录 () + “\data\mpdatamdb”, , “mp611”, , ) = 真)
信息框 (“欢迎使用加菲猪售后管理系统”, 0, )
默认
信息框 (“系统启动失败!”, 0, )
判断结束
刷新列表框 ()
子程序 刷新列表框
局部变量 索引, 整数型
记录集句柄 = 外部数据库1查询 (“select from wxdj”)
超级列表框1全部删除 ()
判断循环首 (外部数据库1尾记录后 (记录集句柄) = 假)
索引 = 超级列表框1插入表项 (, 外部数据库1读 (记录集句柄, “djbh”), , , , )
超级列表框1置标题 (索引, 1, 外部数据库1读 (记录集句柄, “yhxm”))
超级列表框1置标题 (索引, 2, 外部数据库1读 (记录集句柄, “lxdh”))
超级列表框1置标题 (索引, 3, 外部数据库1读 (记录集句柄, “sjggxh”))
超级列表框1置标题 (索引, 4, 外部数据库1读 (记录集句柄, “sjch”))
超级列表框1置标题 (索引, 5, 外部数据库1读 (记录集句柄, “gzms”))
超级列表框1置标题 (索引, 6, 外部数据库1读 (记录集句柄, “sxrq”))
超级列表框1置标题 (索引, 7, 外部数据库1读 (记录集句柄, “sxry”))
超级列表框1置标题 (索引, 8, 外部数据库1读 (记录集句柄, “fhrq”))
超级列表框1置标题 (索引, 9, 外部数据库1读 (记录集句柄, “tzqj”))
外部数据库1到后一记录 (记录集句柄)
判断循环尾 ()
外部数据库1关闭记录集 (记录集句柄)
调用格式: 〈逻辑型〉 高级表格.置对齐方式 (整数型 起始行,整数型 起始列,[整数型 终止行],[整数型 终止列],整数型 对齐方式) - 高级表格支持库->高级表格
英文名称:SetAlign
设置表格中指定区域在显示时所使用的对齐方式。成功返回真、失败返回假。本命令为初级对象成员命令。
参数<1>的名称为“起始行”,类型为“整数型(int)”。
参数<2>的名称为“起始列”,类型为“整数型(int)”。
参数<3>的名称为“终止行”,类型为“整数型(int)”,可以被省略。如果本参数被省略,默认值为起始行。
参数<4>的名称为“终止列”,类型为“整数型(int)”,可以被省略。如果本参数被省略,默认值为起始列。
参数<5>的名称为“对齐方式”,类型为“整数型(int)”。表格文字的对齐方式,可以为以下常量值之一: 1、#表格常量左对齐; 2、#表格常量居中对齐; 3、#表格常量右对齐。
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)