易语言，高级表格，下拉列表项

版本 2

支持库 eGrid

程序集 窗口程序集1

子程序 __启动窗口_创建完毕

高级表格1置列类型 (1, #表格常量列表型)

高级表格1置列类型 (2, #表格常量列表型)

高级表格1插入下拉列表项 (1, “A”)

高级表格1插入下拉列表项 (1, “B”)

子程序 _高级表格1_列表项被选择

参数 行号, 整数型

参数 列号, 整数型

参数 被选择文本, 文本型

高级表格1置列类型 (2, 1)  ' #表格常量文本型

高级表格1置列类型 (2, 4)  ' #表格常量列表型

' 高级表格1清空下拉列表 ()          此方法不能清空，所以换了一种方法

如果真 (行号 ＝ 1 且 列号 ＝ 1 且 被选择文本 ＝ “B”)  ' 插入项可用数组计次插入更为方便

    高级表格1插入下拉列表项 (2, “B——1”)

    高级表格1插入下拉列表项 (2, “B——2”)

如果真结束

如果真 (行号 ＝ 1 且 列号 ＝ 1 且 被选择文本 ＝ “A”)

    高级表格1插入下拉列表项 (2, “A——1”)

    高级表格1插入下拉列表项 (2, “A——2”)

如果真结束

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

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

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

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

版本 2

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

添加变量，创建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”, ) 调试输出

(行) 调试输出 (列)

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

版本 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关闭并释放了！运行效果就是这样子的！这里把变量表也上传上来，方便观看！

版本 2支持库 eExcel2000

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

你少了1条命令：Excel工作簿1激活表格

()

给你看一个例子：

版本

2

支持库

eExcel2000

子程序

_按钮取A1_被单击

如果真

(通用对话框1打开

())

Excel程序1创建

()

Excel工作簿1置程序

(Excel程序1)

Excel工作簿1激活工作簿

()

Excel工作簿1打开

(通用对话框1文件名)

Excel工作簿1表格序号

＝

2

'

即sheet2

Excel工作簿1激活表格

()

Excel程序1显示

＝

真

Excel工作簿1首单元格

＝

“A1”

Excel工作簿1尾单元格

＝

“A1”

编辑框取出的内容内容

＝

Excel工作簿1内容

如果真结束

以上就是关于易语言，高级表格，下拉列表项全部的内容，包括:易语言，高级表格，下拉列表项、易语言excel表格怎样导入到超级列表框、易语言怎么新建EXCEL表格文件等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！