Requerying ListBox会发生什么事？

Question

我有几种子表格的表格。

当用户更改位于主窗体中的组合框值时，我希望使用Requery方法刷新每个子窗体。它按我的意愿工作。

除了其中一个子表单。我添加了一个列表框，并将一个文本框放入SUM列表框中的一列。

我已创建vba代码来计算列。将代码放在子窗体的Current事件中，以及子窗体中的其他几个事件。同样在listbox AfterUpdate事件中。但它似乎没有用。

Dim i, j As Integer
Dim ctl As Control

Set ctl = Me.lstBox

j = ctl.ListCount - 1

Me.txtTotal = 0

For i = 1 To j
    Me.txtTotal = Me.txtTotal + ctl.Column(3, i)
Next i

Me.txtTotal = Format(Me.txtTotal, "#,##")

在子过程名称中添加断点（例如Form_Current等），但似乎没有启动。 我应该把这段代码放在哪里？

EDITED 我尝试将代码放在ComboBox AfterUpdate事件中，它起作用了。 但如果有另一种方法，我仍然可以投票。