網(wǎng)友提問(wèn)：

放大圖片

我反問(wèn)的

回答網(wǎng)友問(wèn)題：

準(zhǔn)備一張表

下面設(shè)計(jì)窗體

首先是做兩個(gè)文本框，設(shè)置如下

然后做兩個(gè)組合框，不進(jìn)行設(shè)置，只改控件名稱，方便一會(huì)使用

再做五個(gè)列表框，設(shè)置如下

最后做一個(gè)按鈕，按鈕上寫文字? "單選"。 控件名稱改成? ?"切換按鈕"

接下來(lái)寫各種事件

1、給窗體寫加載事件

這樣運(yùn)行窗體時(shí)，開(kāi)始月份和結(jié)束月份的組合框就可以進(jìn)行月份選擇了

2、給開(kāi)始月組合框?qū)懜氖录?/span>

3、給結(jié)束月組合框?qū)懜氖录?/span>

然后，我們?cè)谶x擇月份后，姓名列表框單選和姓名列表框多選這兩個(gè)列表框就會(huì)顯示相應(yīng)的值

4、給姓名列表框單選寫更新后事件

這樣，我們?cè)谶@個(gè)列表框選擇相應(yīng)的值時(shí)，會(huì)在下一個(gè)列表框中顯示結(jié)果

5、給姓名列表框多選寫更新后事件

這樣，我在此列表框中無(wú)論單選還是多選，下一個(gè)列表框都會(huì)顯示相應(yīng)的值

6、給區(qū)單選寫更新后事件

我們?cè)谶@個(gè)列表框中單選時(shí)，就會(huì)在最后一個(gè)列表框中顯示最終結(jié)果

7、給區(qū)多選寫更新后事件

我們?cè)谶@個(gè)列表框中單或多選后，最后一個(gè)列表框顯示結(jié)果

8、給按鈕寫點(diǎn)擊 事件

然后 把控件疊在一起? 我沒(méi)對(duì)齊是為了讓你看明白

今后就可以通過(guò)按鈕切換單選和多選了！

友情提示：沒(méi)有必要在每一個(gè)事件中把所有的變量都重寫一遍！我這樣寫只是為了讓您理解。您可以看一下Access講的變量作用域，只需要寫一遍即可！

Access篇+AccessVBA篇：https://www.bilibili.com/video/BV1tf4y117Sh

Access DLC01-時(shí)間日期篇：https://www.bilibili.com/video/BV1H54y1j7vQ

Access DLC02-字符串篇：https://www.bilibili.com/video/BV1q54y1j7y4

Access DLC03-表格篇：https://www.bilibili.com/video/BV1p64y117wH

Access DLC04-查詢篇：https://www.bilibili.com/video/BV1VQ4y1d7h8

Access DLC-05 Excel篇：https://www.bilibili.com/video/BV1mo4y1k7E4

VBA通用篇：https://www.bilibili.com/video/BV1dQ4y1d7fj