Access-控件解析-组合框-01-下拉列表

微信公众号原文

系统：Windows 7
软件：Excel 2010 / Access 2010

• 这个系列介绍常用的控件
• 包括在界面端的设置及在代码端的实现

Part 1：本篇目标

1. 本篇介绍的控件为：组合框。涉及功能为：下拉列表的实现

功能动图

1.gif

Part 2：实现功能

1. 手动设置组合框下拉列表：长江；黄河；珠江；淮河
2. 通过代码修改组合框下拉列表：1；2；3；4
3. 应用场景，组合框的下拉列表随着另外一个控件的取值变化而变化。例如，两个组合框，一个显示省份，一个显示城市，当省份不同时，城市组合框下拉列表也会不同

手动设置：打开组合框属性 - 数据选项卡 - 行来源类型设置为值列表 - 行来源设置下拉列表数据，以分号;隔开

2.png

Part 3：代码

Private Sub Command4_Click()
    ctrlName = "Combo2"
    Set cbo = Me.Controls(ctrlName)
    cbo.RowSource = ""
    cbo.Value = ""
    
    arr = Array(1, 2, 3, 4)
    For Each x In arr
        cbo.AddItem x
    Next
End Sub

代码截图

4.png

Part 4：部分代码解读

1. cbo.RowSource = ""，将下拉列表清空
2. cbo.Value = ""，将组合框取值清空
3. cbo.AddItem x ，增加组合框下拉列表

本文为原创作品，如需转载，可加小编微信号learningBin

---

更多精彩，请关注微信公众号
扫描二维码，关注本公众号

公众号底部二维码.jpg