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

Question

在这里，我想要的是将每一行的值存储到 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

Answer 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