如何将数据库查询添加到字符串列表答案

【问题标题】：How to add database query to list of string如何将数据库查询添加到字符串列表
【发布时间】：2016-08-05 02:35:50
【问题描述】：

在这里，我想要的只是将每一行的值存储到 1 个变量中，并以“#-#”作为分隔符，并将它们附加到字符串列表中，但它不起作用，有什么方法可以做到这一点?提前致谢

Private result As List(Of String)

Public Function GetFromDB()

    Dim values As String
    Try
        result = New List(Of String)
        myConn = New SqlConnection("SERVER=ABALTAZAR-L1\SQLEXPRESS;Database=test;Integrated Security=True;")
        myCmd = myConn.CreateCommand
        myCmd.CommandText = "SELECT * FROM tbl_Item"
        myConn.Open()
        myReader = myCmd.ExecuteReader()
        values = String.Join("#-#", myReader.GetValue(0), myReader.GetValue(1),
                             myReader.GetValue(2), myReader.GetValue(3))
        result.Add(values)
        myConn.Close()
    Catch ex As Exception
        MsgBox(ex)
    End Try
    Return result
End Function

【问题讨论】：

为什么？也许您的问题可以通过另一种方式更好地解决

标签： mysql vb.net sql-server-2012

【解决方案1】：

您需要在代码中添加while 循环以从myReader 中检索每一行。还有一件事，不需要在您的代码中使用string.Join，您可以使用Concat() 函数直接从您的sql 查询中获取连接列。这是您修改后的代码。

Try
    result = New List(Of String)
    myConn = New SqlConnection("SERVER=ABALTAZAR-L1\SQLEXPRESS;Database=test;Integrated Security=True;")
    myCmd = myConn.CreateCommand
    myCmd.CommandText = "SELECT CONCAT(Column1, '#-#', Column2, '#-#', Column3) AS ResultCol FROM tbl_Item"
    myConn.Open()
    myReader = myCmd.ExecuteReader()
    While myReader.read()

        result.Add(myReader.GetValue(0))
    End While

    myConn.Close()
Catch ex As Exception
    MsgBox(ex)
End Try

【讨论】：