我怎么知道哪个列表框被选中了呢？

Question

本帖最后由 520vc 于 2010-02-20 18:42:28 编辑

Answer 1

Option Explicit
Private ActiveListBox As ListBoxPrivate Sub Command1_Click()
    MsgBox "用户选中了" & ActiveListBox.Name
End SubPrivate Sub List1_GotFocus()
    Set ActiveListBox = List1
End SubPrivate Sub List2_GotFocus()
    Set ActiveListBox = List2End SubPrivate Sub List3_GotFocus()
    Set ActiveListBox = List3End Sub

Answer 2

bcrun
 
(网狐(www.devsos.c) 的方法不错，还有其他方法吗？

Answer 3

为什么用GotFocus事件，而不用 Click事件？

Answer 4

选中一个控件有多种方式,选中的标准事件就是gotfocus,比如你按tab键切换到listbox就不会触发click事件而只会有GotFocus事件