❶ 易語言怎樣在超級列表框里顯示ACCESs資料庫
這種列程應該比較多吧,我最近想寫的一個軟體也有這個功能 附上源碼你參考下吧
.版本 2.支持庫 iext
.程序集 起動窗口程序集
.子程序 __啟動窗口_創建完畢
.判斷開始 (外部資料庫1.打開MDB資料庫 (取運行目錄 () + 「\data\mpdata.mdb」, , 「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.關閉記錄集 (記錄集句柄)