问一下ListBox控件的......（简单）

Question

Private Sub List1_ItemCheck(Item As Integer)
        MsgBox List1.List(Item)
End Sub

Answer 1

list1.list(list1.listindex)
orlist1.text

Answer 2

因为：
1、list1的listindex属性指明现在选中的是第几行（当选定第一行时listindex=0，选下第二行时listindex=1，以此类推）
list1的list()属性是存诸这个listbox中所有行内容的数组（字符型），其中第一行的内容存在list(0)中，第二行存在list(1)中。
所以：
你要得到的当前行的值就是list1.list(list1.listindex)另：
listbox还有一个属性text来存贮当前选定行的文本，不过他是只读的，你不能改变其值。而list()可以。例如,list1.list(list1.listindex)="abc"是合法的,而list1.text="abc"就会出错。

Answer 3

IF LIST1.LISTCOUNT>1 THEN 
LIST1.TEST=list1.list(list1.index-1)  
ELSE
LIST1.TEST=LIST1.TEST;
END IF