ListView設(shè)計(jì)實(shí)例

除非注明，文章均為 戰(zhàn)戰(zhàn)如瘋 原創(chuàng)，轉(zhuǎn)載請(qǐng)保留鏈接: http://www./cat4/576.html，VBA交流群273624828。

之前在窗體部分我們講過(guò)ListView的用法，這次來(lái)分享一個(gè)用ListView窗體做的一個(gè)簡(jiǎn)單的飯店點(diǎn)菜系統(tǒng)。整個(gè)系統(tǒng)的效果如下圖

點(diǎn)菜時(shí)需要輸入座位號(hào)、數(shù)量、菜單編號(hào)三項(xiàng)，名單、單價(jià)和小計(jì)會(huì)自動(dòng)根據(jù)前面的數(shù)據(jù)得出，點(diǎn)擊添加會(huì)將點(diǎn)的這道菜加入下面的ListView中，同時(shí)右邊收費(fèi)欄里會(huì)計(jì)算出相應(yīng)的費(fèi)用，選中ListView中的項(xiàng)點(diǎn)刪除會(huì)將已點(diǎn)的菜刪除，點(diǎn)完所有之后點(diǎn)保存清零會(huì)將點(diǎn)菜信息保存到Sheet2工作表。具體的代碼附件里都有，感興趣的可以自己慢慢研究，我不多做介紹。

這里我著重要講的是怎樣才能在工作簿中使用ListView，要想使用ListView你的電腦必須提前注冊(cè)一個(gè)組件MSCOMCTL.OCX，如果你打開(kāi)附件發(fā)現(xiàn)錯(cuò)誤提示很可能就是你沒(méi)有注冊(cè)這個(gè)組件或者注冊(cè)的版本和我的不一樣，那你就將本文附件中的MSCOMCTL.OCX注冊(cè)到你自己的電腦上。32位系統(tǒng)將MSCOMCTL.OCX放到C:\Windows\System32下，在開(kāi)始的搜索欄里運(yùn)行"regsvr32  MSCOMCTL.OCX"，如果你的是64位系統(tǒng)那比較復(fù)雜一點(diǎn)，首先將MSCOMCTL.OCX放到C:\Windows\SysWOW64目錄下，然后在開(kāi)始-所有程序-附件中找到命令提示符，右鍵，以管理員身份運(yùn)行

在打開(kāi)的命令窗口中輸入regsvr32 C:\Windows\SysWOW64\MSCOMCTL.OCX，回車(chē)即可。

進(jìn)入VBE界面，在控件工具箱上右鍵-附加組件，選擇Microsoft ListView Control 6.0(SP6)，這時(shí)ListView控件就出現(xiàn)在了你的控件工具箱中。

本節(jié)示例文件： http://pan.baidu.com/s/1dD6GvVr 。