将项目添加到多列列表框

Question

谁能给我一个简单的例子，说明如何在 vbscript 中向多列列表框添加值。 例如，我有 4 列，我想添加一行。

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

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

我一直在寻找无济于事 - 我还没有找到一个有效的例子，或者至少我错过了一些导入？

Answer 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。}