Question

您好，对不起我的noob问题。我一直试图找到几个小时的答案（包括官方msdn微软指南）没有积极的结果。

目前我正在开发VB.Net Parcel Delivery项目，该项目旨在从访问数据库中写入和检索数据。在显示表单上，它在数据网格视图中显示所选数据，我使用sql查询仅检索英国的entires。我能够显示满足条件的条目数，但无法弄清楚如何运行另一个查询，因此它将计算包裹的平均成本，以及如何将结果传递给变量。有人可以看看这个并帮忙吗？将就如何改进代码提出建议。请记住，我处于非常开始的水平。

    Private Sub frmUkInfo_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    dbProvider = "PROVIDER=Microsoft.Jet.OLEDB.4.0;"
    dbSource = "Data Source= D:/ProjectDatabase.mdb"
    connect.ConnectionString = dbProvider & dbSource

    connect.Open()
    dataSet.Tables.Add(dataTable)

    sql = "SELECT * FROM Parcels WHERE ParZone = ""UK"""
    dataAdapter = New OleDb.OleDbDataAdapter(sql, connect)
    dataAdapter.Fill(dataTable)

    dataView.DataSource = dataTable.DefaultView

    connect.Close()

    rowsNo = dataView.Rows.Count
    lblParcelsNoDisplay.Text = rowsNo

End Sub

提前感谢您的帮助。

Answer 1

尝试

sql = "SELECT * FROM Parcels WHERE ParZone = 'UK'"

Answer 2

您可以使用Linq-To-DataTable获取平均价格：

Dim parcelPrices = From row In dataTable.AsEnumerable()
                   Select row.Field(Of Double)("Price")
Dim averageCostOfParcels As Double = parcelPrices.Average()

VB从Access数据库中提取平均值

2 个答案: