开源办公套件LibreOffice以其强大的数据库组件Base闻名，但许多用户在表单设计中常被“多列列表框”这一控件难住。如何让这个看似简单的控件真正显示多列数据？本文将手把手教你完成创建与数据加载的全流程。

在办公自动化场景中，下拉列表（ComboBox）只能显示单列内容，而多列列表框（Multicolumn Listbox）则能像Excel表格一样，在同一个选择框中呈现多列信息——比如同时显示员工姓名、工号和部门。这一功能在LibreOffice Base表单设计中尤为实用，但官方文档对具体实现着墨不多。本文将从零开始，揭示两种主流方法：图形界面操作与Basic宏控制。

方法一：图形界面快速搭建（适合初学者）

首先确保已经创建了LibreOffice Base数据库并建立了包含多列的表（例如“员工表”含姓名、工号、部门三列）。打开窗体设计模式，从控件工具箱中拖入“列表框”（List Box），右键进入“属性”面板。

关键设置位于“数据”选项卡：
- 数据源：选择“表/查询”，并指定你的表。
- 字段：这里不要直接选择单字段，而应选择“（多个字段）”——这个选项往往被忽略。
- 列数目：填入3（对应三列）。
- 列宽：输入“5cm;3cm;4cm”（用分号分隔），控制各列显示宽度。
- 边界列：设为1，表示第一列将作为实际传给后端的值。

完成属性设置后，保存表单并切换至“测试模式”。此时列表框应显示三列数据，但可能发现列标题缺失——LibreOffice原生不支持直接显示列标题，需要额外添加标签控件作为伪标题。

方法二：Basic宏实现动态加载（进阶需求）

当需要从不同表或带条件查询的数据填充列表框时，图形界面可能捉襟见肘。此时可借助LibreOffice的Basic宏。以下是一段核心代码示例：

Sub LoadMulticolumnListbox()
    Dim oForm As Object
    Dim oListBox As Object
    Dim oRS As Object
    Dim oStatement As Object
    Dim aItems(0 To 2) As New com.sun.star.beans.PropertyValue

    '获取当前表单与列表框
    oForm = ThisComponent.DrawPage.Forms.getByName("MainForm")
    oListBox = oForm.getByName("ListBox1")

    '创建数据库连接
    oStatement = CreateUnoService("com.sun.star.sdb.DatabaseContext")
    oStatement = oStatement.getByName("你的数据库名字").getConnection("","").createStatement()

    '执行查询并遍历结果
    oRS = oStatement.executeQuery("SELECT 姓名,工号,部门 FROM 员工表")

    '清空列表框并设置列数
    oListBox.removeItems(0, oListBox.getItemCount())
    oListBox.ColumnCount = 3

    Do While oRS.next()
        Dim sRow As String
        sRow = oRS.getString(1) & Chr(9) & oRS.getString(2) & Chr(9) & oRS.getString(3)
        oListBox.addItem(sRow, oListBox.getItemCount())
    Loop

    oRS.close()
End Sub

此宏通过Tab字符（Chr(9)）分隔各列数据，实现多行多列的填充。需注意：宏需在数据库文档的“工具→宏→编辑宏”中插入，并确保数据库连接名称正确。

常见问题与优化建议

问题一：列宽无法对齐？
检查属性中的“列宽”值是否包含单位（cm或inch）。如果使用宏加载，需在添加项后手动设置“ColumnWidths”属性，例如：oListBox.ColumnWidths = "5cm;3cm;4cm"。

问题二：数据加载后只显示第一列？
这是最典型的错误。请确认属性“列数目”已正确设置，并且数据源字段选择了“（多个字段）”。若使用宏，务必确保添加的字符串中列分隔符为Tab。

问题三：无法联动刷新？
若需要根据其他控件选择动态更新列表框，可在窗体中添加“在更改时执行”事件，调用宏重新加载查询。

结语：超越单列的限制

多列列表框不仅让数据选择更加直观，更避免了用户在多个下拉框之间来回切换的困扰。无论是通过图形界面快速部署，还是利用宏实现复杂逻辑，LibreOffice都提供了灵活的工具。随着开源生态的持续完善，类似技能将帮助更多办公用户摆脱商业软件的束缚。

下一步，你可以尝试将多列列表框与子窗体联动，实现类似“选择员工后自动填充其联系方式”的高级交互——这将是提升表单效率的又一里程碑。