hmmmm. LodeDbException?? do you mean oledbexception?

place your query section in a try catch loop and catch the exception to get a more specific error message
ie
VB Code:
  1. Try
  2.             cmd = New OleDbCommand(strSql, con)
  3.             dr = cmd.ExecuteReader
  4.             Dim QueryResult As New ArrayList
  5.             While dr.Read
  6.                 Dim dummy As New Average
  7.                 dummy.Name = dr("name")
  8.                 If Not IsDBNull(dr("average")) Then
  9.                     dummy.Average = dr("average")
  10.                 Else
  11.                     dummy.Average = "0"
  12.                 End If
  13.                 QueryResult.Add(dummy)
  14.             End While
  15.             dgvAverage.DataSource = QueryResult
  16.         Catch ex as OleDBException
  17.             MessageBox.Show(ex.Message)
  18.         End Try