リストボックス内の特定の列をカウントする

Question

リストボックスの特定の列にあるアイテムの数を調べる方法はありますか？

A  B  C  D 
------------------- 
a  b  c  
a   c  
a     
a     d 
a   c  d 
a   c  d 

A = 6

B = 1

C = 4

D = 3

Iは、（例えば、列D中の項目の数をカウントする必要はありませんすべて4つ）。

Answer 1

リストボックスにはリストプロパティがあります。 Listのプロパティはゼロベースの配列を返します。

• 第一列は0
• 最後の列がListBox1.ColumnCount -1
• 1行目が0
• 最後の行であるListBox1.ListCount - 1

Dim rowIndex As Integer 
 
Dim columnIndex as Integer 
 
Dim totalItems As Double 
 
columnIndex = 0 
 

 
For rowIndex = 0 To ListBox1.ListCount - 1 
 
    totalItems = totalItems + ListBox1.List(rowIndex , columnIndex) 
 
Next