Database Access数据库-错误为';单个';

Database Access数据库-错误为';单个';,database,Database,我从行SingleRoom=dr(“Single”).ToString中得到错误“Single”。我编程时间不长。我希望能够在数据库中搜索最近的日期(上次修改),然后使用同一行中其他字段的数据显示为标签 Dim PriceFound As String = False MyConn = New OleDbConnection MyConn.ConnectionString = connString MyConn.Open() str1 = ("SELEC

我从行
SingleRoom=dr(“Single”).ToString
中得到错误“Single”。我编程时间不长。我希望能够在数据库中搜索最近的日期(上次修改),然后使用同一行中其他字段的数据显示为标签

Dim PriceFound As String = False
    MyConn = New OleDbConnection 
    MyConn.ConnectionString = connString 
    MyConn.Open() 


    str1 = ("SELECT `Last Modified` FROM [Prices] ORDER BY `Last Modified` DESC") 


    Dim cmd1 As OleDbCommand = New OleDbCommand(str1, MyConn)

    dr = cmd1.ExecuteReader 

    While dr.Read() 

        PriceFound = True 
        DateDisplay = dr("Last Modified").ToString
        SingleRoom = dr("Single").ToString 
        DoubleRoom = dr("Double").ToString 
        FamilyRoom = dr("Family").ToString 
        AdultPrice = dr("Adult").ToString 
        ChildPrice = dr("Child").ToString

        If PriceFound = True Then
            LblPriceAdult.Text = AdultPrice
            LblPriceChild.Text = ChildPrice
            LblPriceDoubleRoom.Text = DoubleRoom
            LblPriceFamilyRoom.Text = FamilyRoom
            LblPriceSingleRoom.Text = SingleRoom
        End If
    End While
    MyConn.Close() 

您的查询可能是:

"SELECT * FROM [Prices] ORDER BY `Last Modified` DESC"
…以便检索SELECT子句中的其他列/字段。当前查询仅检索上次修改的

=====

此外,如果只想选择特定列,可以在查询中执行以下操作:

请注意,列顺序并不重要——我只是在本例中匹配了您的列表

"SELECT `Last Modified`, Single, Double, Family, Adult, Child FROM [Prices] ORDER BY `Last Modified` DESC"