怎样取得多栏列表框第N栏的数据 & y7 y# ^ u- i$ k* o' ^我们在用列表框时，经常会用到多栏列表。 & ^; y. L. x# l0 O 但怎样取得多栏列表框第N栏的数据，请看下面代码：5 c! p% L9 j: I3 s. n$ A
Dim I As Integer '定义变量存储被选中行的序号 ( W6 y* y: U1 l, t% A2 \0 i For I = 0 To 列表1.ListCount - 1/ U$ o- `7 p" M+ m, b
If 列表1.Selected(I) Then 6 X' j- a: g. r8 a Exit For. V: D* d( a* L* W
End If6 O4 {5 R j7 F' H4 n
Next I. e: C) {$ C7 h
'报出第一栏与第二栏的值 / O/ x5 ?; U/ ]8 H t msgbox 列表1.Column(0, I) & " " & 列表1.Column(1, I)
发表于 2012-7-31 22:26:35
