将项添加到多列列表框

时间:2014-03-14 08:27:41

标签: vba vbscript listbox

有人可以给我一个简单的例子,说明如何在vbscript中为多列列表框添加值。 例如,我有4列,我想添加一行。

http://msdn.microsoft.com/en-us/library/office/ff869962%28v=office.15%29.aspx我试过这个例子,但它一直告诉我它无法找到成员。列。

我在MS Access中使用vbscript。我有一个带有列表框的表单。我想用我拥有的文本框值填充此列表框,以便当我单击“添加”时,文本框中的值将添加到其特定列下的列表框中。

我一直在寻找无济于事 - 我还没有找到一个有用的例子,或者至少我错过了一些重要信息?

1 个答案:

答案 0 :(得分:1)

我记得我曾经做过一次这样的解决方案:

Private Sub test()
    Me.lboTest.RowSourceType = "Value List"
    Me.lboTest.BoundColumn = 1
    Me.lboTest.ColumnCount = 2
    Me.lboTest.RowSource = "0;red;1;green;2;yellow;3;blue"
End Sub

预先用;组装字符串(或读取并附加值,然后将其写回)。
我不知道是否还有其他办法。

顺便说一下,只是为了确保你做对了:VBA和VBScript是不同的东西。如果您在Access本身中编写此代码,则使用的是VBA,而不是VBScript。