易语言excel表格怎样导入到超级列表框

2025-09-20 22:20:20

1、准备好需要的excel表格数据,这里为了演示,随意添加一些数据!打开易语言,新建windows窗口程序,接着就可以添加必要的组件!

易语言excel表格怎样导入到超级列表框

易语言excel表格怎样导入到超级列表框

2、添加必要的组件,这里用到编辑框、按钮、通用对话框、超级列表框、以及excel程序、excel工作簿!

易语言excel表格怎样导入到超级列表框

易语言excel表格怎样导入到超级列表框

易语言excel表格怎样导入到超级列表框

3、简单处理一下界面,将组件的标题、超级列表框设置为报表列表框、显示格线,对应设置一下报表列与excel表格,大致界面就完成了!

易语言excel表格怎样导入到超级列表框

易语言excel表格怎样导入到超级列表框

易语言excel表格怎样导入到超级列表框

4、接下来进入代码部分,_按钮打开_被单击事件下,先添加通用对话框使用代码!过滤文件、指定打开的目录!

.版本 2

通用对话框1.类型 = 0通用对话框1.初始目录 = 取运行目录 ()通用对话框1.过滤器 = “excel文件(*.xlsx)|*.xlsx”.如果真 (通用对话框1.打开 ())    编辑框1.内容 = 通用对话框1.文件名

易语言excel表格怎样导入到超级列表框

5、添加变量,创建excel程序,读出excel表格的行数与列数!

.版本 2.支持库 eExcel2000.支持库 spec

    Excel程序1.创建 ()    Excel程序1.显示 = 假    Excel工作簿1.置程序 (Excel程序1)

    Excel工作簿1.打开 (通用对话框1.文件名)    Excel工作簿1.激活工作簿 ()    Excel工作簿1.激活表格 ()    Excel工作簿1.表格序号 = 0    工作簿对象 = Excel工作簿1.取表格对象 ()    范围 = 工作簿对象.读对象型属性 (“UsedRange”, )    行对象 = 范围.读对象型属性 (“Rows”, )    行 = 行对象.读数值属性 (“Count”, )    列对像 = 范围.读对象型属性 (“Columns”, )    列 = 列对像.读数值属性 (“Count”, )    调试输出 (行)    调试输出 (列)

易语言excel表格怎样导入到超级列表框

易语言excel表格怎样导入到超级列表框

6、接下来就可以用计次循环首分别读入每一行的数据了!,这里为好理解,用了个笨方法,每循环一次代表读取每一行的数据!然后就把取得的数据置入超级列表框就行了!

.版本 2.支持库 eExcel2000.支持库 iext

    .计次循环首 (行, n1)        Excel工作簿1.首单元格 = “A” + 到文本 (n1)        Excel工作簿1.尾单元格 = “A” + 到文本 (n1)        单元格对象 = Excel工作簿1.取单元格对象 ()        A列 = 单元格对象.读文本属性 (“Value”, )

        Excel工作簿1.首单元格 = “B” + 到文本 (n1)        Excel工作簿1.尾单元格 = “B” + 到文本 (n1)        单元格对象 = Excel工作簿1.取单元格对象 ()        B列 = 单元格对象.读文本属性 (“Value”, )

        Excel工作簿1.首单元格 = “C” + 到文本 (n1)        Excel工作簿1.尾单元格 = “C” + 到文本 (n1)        单元格对象 = Excel工作簿1.取单元格对象 ()        C列 = 单元格对象.读文本属性 (“Value”, )

        Excel工作簿1.首单元格 = “D” + 到文本 (n1)        Excel工作簿1.尾单元格 = “D” + 到文本 (n1)        单元格对象 = Excel工作簿1.取单元格对象 ()        D列 = 单元格对象.读文本属性 (“Value”, )

        Excel工作簿1.首单元格 = “E” + 到文本 (n1)        Excel工作簿1.尾单元格 = “E” + 到文本 (n1)        单元格对象 = Excel工作簿1.取单元格对象 ()        E列 = 单元格对象.读文本属性 (“Value”, )

        Excel工作簿1.首单元格 = “F” + 到文本 (n1)        Excel工作簿1.尾单元格 = “F” + 到文本 (n1)        单元格对象 = Excel工作簿1.取单元格对象 ()        F列 = 单元格对象.读文本属性 (“Value”, )

        索引 = 超级列表框1.插入表项 (, , , , , )        超级列表框1.置标题 (索引, 0, A列)        超级列表框1.置标题 (索引, 1, B列)        超级列表框1.置标题 (索引, 2, C列)        超级列表框1.置标题 (索引, 3, D列)        超级列表框1.置标题 (索引, 4, E列)

    .计次循环尾 ()

易语言excel表格怎样导入到超级列表框

易语言excel表格怎样导入到超级列表框

7、读入完毕后,当然要将excel关闭并释放了!运行效果就是这样子的!这里把变量表也上传上来,方便观看!

.版本 2.支持库 eExcel2000

    Excel工作簿1.关闭 ()    Excel工作簿1.释放 ()    Excel程序1.退出 ()    Excel程序1.释放 ()

易语言excel表格怎样导入到超级列表框

易语言excel表格怎样导入到超级列表框

易语言excel表格怎样导入到超级列表框

声明:本网站引用、摘录或转载内容仅供网站访问者交流或参考,不代表本站立场,如存在版权或非法内容,请联系站长删除,联系邮箱:site.kefu@qq.com。
猜你喜欢