怎么设置VB列表框多行显示

怎么设置VB列表框多行显示

要在list的属性窗口设置
MultiSelect(多选属性），基值可为：
0：每次只选一个
1 :同时选多个
2：可用shift连选，ctrl不连续选择
应该将MulstiSelect设为1。

问题2：在代码中实现
Private Sub Command1_Click()
For i = 0 To List1.ListCount - 1
If List1.Selected(i) = True Then
Print List1.List(i)
End If
Next i
End Sub

列表框本来就是多行显示的

你大概想问怎么多列显示吧？很困难，建议你还是用ListView控件代替

Columns属性 用于指定列表框中列的数目(栏数)。列表框中的项目可以单列垂直显示，也可以水平单列或水平多列列表显示，其取值如表2.2所示。 Columns属性值及其含义 0 垂直单列列表 1 水平单列列表 大于1 水平多列列表 Columns属性不适用于组合框，因为组合框不支持项目的多列显示。

注意题目的要求： 要想【不使用】shift或ctrl键就能在列表中【同时选择】多个项目 multiselect = 0 只允许单选 multiselect = 1 允许按住shift或ctrl键多选，多选了是多选的，但是不符合题目要求 multiselect = 2 列表前有复选框，这样只要勾选复选框了，不就是【不使用shift或ctrl键就能多选】嘛！

在列表框的属性中设置colums的值为0，然后在属性的list中输入你所需要的项目。当完成一项时，按Ctrl+Enter就可以输入下一个选项。 属性中的colums=0（默认）列表框垂直滚动 colums=1 列表框水平滚动