10、巧用拖放操作与分组页码设置优化数据处理

巧用拖放操作与分组页码设置优化数据处理

1. 列表框拖放控制

在数据处理中，列表框的操作是常见需求。通过拖放操作来控制列表框中的成员，能极大提升用户体验。

1.1 代码调整

原本的 cmdAddToList_Click 和 cmdRemoveFromList_Click 例程默认声明为 Private Sub ，为了能在多处调用这些逻辑，需将其声明改为 Public Sub 。

' 原声明
Private Sub cmdAddToList_Click()
Private Sub cmdRemoveFromList_Click()

' 修改后的声明
Public Sub cmdAddToList_Click()
Public Sub cmdRemoveFromList_Click()

1.2 相关模块与代码

• 模块 frmPairedListboxes ：包含维护成员信息的代码，除 lstIn_MouseMove 和 lstNotIn_MouseMove 例程，以及上述声明的修改外，与之前的代码类似。

Option Compare Database
Option Explicit

Private S