易語言在操作excel時,常用自帶組件表格或者高級表格來進行互換操作,把excel作為一個數據庫類型,那么excel能不能用超級表框來互換操作,現在來看看怎樣將excel表格的數據導入到超級列表框吧!
工具/原料
易語言軟件!
excel表格數據
方法/步驟
準備好需要的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.釋放 ()
END
注意事項
其中在第6步中,讀入數據可以用行數、列數進行嵌套循環可以了,能有效簡化代碼量,可以自行思考改寫!
新聞熱點
疑難解答