如何用SQL查询填充数组列表

Question

我正在开发一个VB。. NET ASPX文件。这个报告目前正在工作，但现在我想添加一个参数，它应该是一个数组列表，显示所有记录从下面的SQL查询:

" select distinct instrument_name AS instrument_name from FRUD. "tblXref order by instrument_name "

但是这个数组列表显示的是"System.Data"。对于代码中所有可能的值:

Sub Main()          
Dim pcSQL As String
Dim ProductList As New ArrayList()
pcSQL = " select distinct instrument_name AS instrument_name from FRUD.tblXref order by instrument_name "
Dim DBConn As SqlConnection
DBConn = New SqlConnection(ConfigurationManager.AppSettings("AMDMetricsConnectionString"))
DBConn.Open()
Dim reader As SqlDataReader
Dim DBCommand As New SqlCommand(pcSQL, DBConn)
reader = DBCommand.ExecuteReader()
dProdCodeSearch.DataSource = reader
dProdCodeSearch.DataBind()
reader.Close()

我确信我做错了什么，这是一个非常简单的修复。此SQL连接适用于此报告中的数据表。但这是我设置为SQL输出的唯一参数。

Answer 1

您需要创建一个Collection来存储来自数据库的值，然后将这些值读入一个数组。就像

Dim instrumentNames As New List(Of String)
While reader.Read()
   instrumentNames.Add(reader.GetString("insturment_name"))
End While
dProdCodeSearch.DataSource = insturmentNames