SQL = "Select * from FiBuAFA where Bezeichnung = @Suchbegriff order by" & _
  "BEZEICHNUNG "
Dim cmd As OleDbCommand = New OleDbCommand()
cmd.Connection = con
cmd.CommandText = SQL
cmd.Parameters.Clear()
cmd.Parameters.AddWithValue("@Suchbegriff", LStr_Suchbegriff)
con.Open()
reader = cmd.ExecuteReader

cmd.Parameters.Add("@Suchbegriff", OleDbType.Char).Value = LStr_Suchbegriff

mein aktuelles .net-Projekt:
http://www.fiman.de
freue mich über Test-Informationen.

Screenshots gibt es hier: http://www.fiman.de