会计考友 发表于 2012-7-31 22:26:35

怎样取得多栏列表框第N栏的数据

怎样取得多栏列表框第N栏的数据
我们在用列表框时,经常会用到多栏列表。
  但怎样取得多栏列表框第N栏的数据,请看下面代码:
  Dim I As Integer '定义变量存储被选中行的序号
  For I = 0 To 列表1.ListCount - 1
  If 列表1.Selected(I) Then
  Exit For
  End If
  Next I
  '报出第一栏与第二栏的值
  msgbox 列表1.Column(0, I) & " " & 列表1.Column(1, I)
页: [1]
查看完整版本: 怎样取得多栏列表框第N栏的数据