子窗体的change事件怎么不起作用？

sunny　发表于：2011-08-02 15:15:41 　

Private Sub bh_Change()
Me.mc.SetFocus
Me.bh.SetFocus
If Len(Me.bh) > 0 Then
Me.bh.SelStart = Len(Me.bh)
End If
End Sub

Private Sub bh_GotFocus()
Me.bh.Dropdown
End Sub

本意是想当组合框有变更时焦点移到名称再移回编号，但是子窗体的change不起作用

还能有什么办法？

煮江品茶发表于：2011-08-02 15:37:59

用不着通过移动焦点更新数据，可以直接me.Recalc就可以了。

sunny 发表于：2011-08-04 08:59:06

但是要在组合框编号有变化时触发me.Recalc，现在Private Sub bh_Change()不起作用，如何触发？

煮江品茶发表于：2011-08-04 09:55:52

你把其他事件都删除，只保留如下更改事件：

Private Sub bh_Change()
Me.Recalc
Me.bh.SelStart = Len(Nz(Me.bh, 0))
End Sub

总记录：3篇页次：1/1 9 1 :

Access交流中心