Access database filteren

[wdevaal]

In mijn programma maak ik gebruik van een access database bestand (*,mdb).
De database wil ik kunnen filteren “Me.InhoudBindingSource.Filter”.
Ik het veld “Nummer” wil ik b.v. filteren op het nummer 101
Ik gebruik nu deze code die opzich goed werkt:

Me.InhoudBindingSource.Filter = "[Nummer] LIKE '*" & "101" & "*' "

Maar het moet geen “LIKE” zijn maar “=” dus bedacht ik de volgende code.

Me.InhoudBindingSource.Filter = "[Nummer] = '*" & "101" & "*' "

Maar dit werkt helaas niet.
Uiteindelijk moet het zo worden.

Dim strValue As String
strValue = InputBox("Voer het nummer in.", "Nummer invoeren", "")
Me.InhoudBindingSource.Filter = "[Nummer] = '*" & strValue & "*' "

Wie weet de oplossing.

mvg Willy

 

[wdevaal]

Is er niemand met voldoende kennis op deze vraag aanwezig op dit forum.
Zo niet dan zal ik het op een andere plek moeten gaan zoeken.

mvg. Willy...

 

[wdevaal]

Ik zie dat dit topic al meer dan 45 maal bekeken is, dus plaats ik hier zelf even de oplossing voor mij eigen hier boven gestelde vraag.

Dit is de juiste werkende oplossing:

Dim strValue As String
strValue = InputBox("Voer een nummer in.", "Nummer", "")
Me.InhoudBindingSource.Filter = "[Nummer] = '" & strValue & "'"

mvg Willy...