在VB编程中，利用数据库填充列表框（ListBox）通常涉及以下步骤：
建立数据库连接
使用ADO.NET库来连接数据库。首先，需要确定数据库的类型（如SQL Server、Access等）和位置，然后创建一个数据库连接字符串。
执行SQL查询
编写SQL查询语句以从数据库中检索所需的数据。
读取查询结果
使用DataReader对象执行查询，并通过循环读取每一行的数据。
将数据添加到列表框
使用ListBox的Items属性和Add方法将数据逐个添加到列表框中。
关闭数据库连接
完成数据读取后，关闭数据库连接以释放资源。
```vb
' 1. 建立数据库连接
Dim connectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0；Data Source=" & App.Path & "\db.mdb；Persist Security Info=False"
Dim connection As New ADODB.Connection
connection.Open（connectionString）
' 2. 执行SQL查询
Dim sqlQuery As String = "SELECT 姓名 FROM 学生"
Dim command As New ADODB.Command
command.CommandText = sqlQuery
command.Connection = connection
' 3. 读取查询结果
Dim reader As ADODB.Recordset = command.ExecuteReader（）
' 4. 将数据添加到列表框
Dim listBox As New ListBox
listBox.DataSource = reader
listBox.DisplayMember = "姓名" ' 设置显示的列
' 5. 关闭数据库连接
reader.Close（）
connection.Close（）
```
详细步骤说明：
建立数据库连接
`connectionString` 是连接到数据库所需的字符串，格式取决于数据库类型和位置。
`connection` 对象用于打开与数据库的连接。
执行SQL查询
`sqlQuery` 是从数据库中检索数据的SQL语句。
`command` 对象用于执行SQL查询，并通过 `connection` 对象进行连接。
读取查询结果
`reader` 对象用于读取查询结果。通过循环读取每一行的数据。
将数据添加到列表框
`listBox` 对象用于显示数据。
`DataSource` 属性设置为 `reader` 对象，`DisplayMember` 属性设置为要显示的列名（例如 "姓名"）。
关闭数据库连接
关闭 `reader` 和 `connection` 对象以释放资源。
通过这些步骤，你可以将数据库中的数据导入到列表框中，使用户能够选择和查看数据库中的数据。