我想使用多列列表框来显示数据列表。列表的总长度是动态的,因此列表框似乎适合我。
在前几行中,我想提供一些描述性信息。
我的问题是某些字符串会比列宽更长,因此不会完全显示。即使第一行的某些列是空的。有没有办法“合并细胞”或什么?
Private Sub UserForm_Initialize()
Me.lbFluidValues.Clear
Me.lbFluidValues.ColumnCount = 10
Me.lbFluidValues.ColumnWidths = "40;40;40;40;40;40;40;40;40;40"
For i = 1 To 9
lbFluidValues.AddItem
Next i 'assing values to the columns
For i = 10 To 18
lbFluidValues.AddItem
lbFluidValues.List(i - 1, 0) = i
lbFluidValues.List(i - 1, 1) = i * 10
lbFluidValues.List(i - 1, 2) = i * 100
lbFluidValues.List(i - 1, 3) = i * 1000
Next i
lbFluidValues.List(1, 1) = "a very long string doesn't fit here"
End Sub