易語言在操作excel時，常用自帶組件表格或者高級表格來進行互換操作，把excel作為一個數(shù)據(jù)庫類型，那么excel能不能用超級表框來互換操作，現(xiàn)在來看看怎樣將excel表格的數(shù)據(jù)導(dǎo)入到超級列表框吧!

工具/原料

易語言軟件!

excel表格數(shù)據(jù)

方法/步驟

準備好需要的excel表格數(shù)據(jù)，這里為了演示，隨意添加一些數(shù)據(jù)!打開易語言，新建windows窗口程序，接著就可以添加必要的組件!

添加必要的組件，這里用到編輯框、按鈕、通用對話框、超級列表框、以及excel程序、excel工作簿!

簡單處理一下界面，將組件的標題、超級列表框設(shè)置為報表列表框、顯示格線，對應(yīng)設(shè)置一下報表列與excel表格，大致界面就完成了!

接下來進入代碼部分，_按鈕打開_被單擊事件下，先添加通用對話框使用代碼!過濾文件、指定打開的目錄!

.版本 2

通用對話框1.類型 = 0通用對話框1.初始目錄 = 取運行目錄 ()通用對話框1.過濾器 = “excel文件(*.xlsx)|*.xlsx”.如果真 (通用對話框1.打開 ()) 編輯框1.內(nèi)容 = 通用對話框1.文件名

添加變量，創(chuàng)建excel程序，讀出excel表格的行數(shù)與列數(shù)!

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

Excel程序1.創(chuàng)建 () Excel程序1.顯示 = 假 Excel工作簿1.置程序 (Excel程序1)

Excel工作簿1.打開 (通用對話框1.文件名) Excel工作簿1.激活工作簿 () Excel工作簿1.激活表格 () Excel工作簿1.表格序號 = 0 工作簿對象 = Excel工作簿1.取表格對象 () 范圍 = 工作簿對象.讀對象型屬性 (“UsedRange”, ) 行對象 = 范圍.讀對象型屬性 (“Rows”, ) 行 = 行對象.讀數(shù)值屬性 (“Count”, ) 列對像 = 范圍.讀對象型屬性 (“Columns”, ) 列 = 列對像.讀數(shù)值屬性 (“Count”, ) 調(diào)試輸出 (行) 調(diào)試輸出 (列)

接下來就可以用計次循環(huán)首分別讀入每一行的數(shù)據(jù)了!，這里為好理解，用了個笨方法，每循環(huán)一次代表讀取每一行的數(shù)據(jù)!然后就把取得的數(shù)據(jù)置入超級列表框就行了!

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

.計次循環(huán)首 (行, 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列)

.計次循環(huán)尾 ()

讀入完畢后，當(dāng)然要將excel關(guān)閉并釋放了!運行效果就是這樣子的!這里把變量表也上傳上來，方便觀看!

.版本 2.支持庫 eExcel2000

Excel工作簿1.關(guān)閉 () Excel工作簿1.釋放 () Excel程序1.退出 () Excel程序1.釋放 ()

END

注意事項

其中在第6步中，讀入數(shù)據(jù)可以用行數(shù)、列數(shù)進行嵌套循環(huán)可以了，能有效簡化代碼量，可以自行思考改寫!