An unhandled exception of type 'system.data.oledb.oledbexception' occurred in system.data.dll additional information: no value given for one or more required parameters.

See more:

VB

Private Sub Admissionrecord_Load(sender As Object, e As EventArgs) Handles MyBase.Load
'TODO: This line of code loads data into the 'ButhdatabaseDataSet.Admission' table. You can move, or remove it, as needed.
OpenConnection()
Dim da As OleDbDataAdapter
Dim dt As DataTable
da = New OleDbDataAdapter("SELECT Hospital No,Patient's Name,Date Attended,Reffered By,Consultant,Ward,Date Discharged,Discharged To,Condition On Discharge,Discharge Summary FROM Admission", Connection)
dt = New DataTable
da.Fill(dt)
AdmissionDataGridView.DataSource = dt
AdmissionDataGridView.Refresh()
Connection.Close()
da.Dispose()

What I have tried:

please kindly help me with this. thank you