如何取得选中的列表框的行号！

徐阿鹏

Dim I As Integer '定义变量存储被选中行的序号

For I = 0 To List.ListCount - 1

If List.Selected(I)Then

        Exit For

End If

Next I

这段代码有什么问题，为什么我放在list单击的事件上不能工作！

请指教！

谢谢！

ksiv

上述代码只是一个循环，找到列表框的第一个被选择行号

可以在窗体上设置一个文本框控件用于显示当前被选中的列表框的行号I

而不是放在列表框的单击事件里

zhengjialon

不知道你想要的结果是什么？这一段代码所要实现的功能是什么？以及不能工作后所出现的错误提示有吗？