![](/forum/profile/get-photo.asp?memberid=27&type=profile&rnd=376) Elite Veteran
Beiträge: 860
![500](http://www.donkarl.com/forum/images/decorations/multiple/500.gif) ![100](http://www.donkarl.com/forum/images/decorations/multiple/100.gif) ![100](http://www.donkarl.com/forum/images/decorations/multiple/100.gif) ![100](http://www.donkarl.com/forum/images/decorations/multiple/100.gif) ![25](http://www.donkarl.com/forum/images/decorations/multiple/25.gif) ![25](http://www.donkarl.com/forum/images/decorations/multiple/25.gif) Ort: Wien | Hallo, Peter!
pwakolbi - 28.05.12
...
Mit nachfelgenden Anweisungen hatt ich kein Glück:
strfeld1=txtfeld1
If strFeld1 = "*A*" Or strFeld1 = "*B*" Or strFeld1 = "*C*" _
Or strFeld1 = "*D" Then
bolFeld1 = false
end if
...
if bolfeld1 false then
msgbox"Falscher eintrag"
end if
Also die Zeichen A B C D Habne im strFeld1/txtFeld1 nichtrs verlohren
...
Da gibt's etliche mögliche Varianten. In deiner obigen müsstest du statt = Like verwenden. Wenn bolfeld1 eine boolsche Variable ist, die nicht vorher explizit auf True gesetzt wurde, ist sie immer False. Daher besser gleich True verwenden. Also:
If strFeld1 Like "*A*" Or strFeld1 Like "*B*" Or _
strFeld1 Like "*C*" Or strFeld1 Like "*D" Then
bolfeld1 = True
End If
If bolfeld1 = True Then
MsgBox "Falscher eintrag"
End If
Falls das nicht funktioniert, dann verrate, bei welchem Ereignis der Code steht und welche Fehlermeldung/nummer oder welches Fehlverhalten auftritt.
----- Servus
Karl
*********
Access-Entwickler-Konferenz: https://www.donkarl.com/?aek
Access DevCon Vienna: https://www.donkarl.com/devcon
Access Forever: https://www.accessforever.org
Access News: https://www.youtube.com/playlist?list=PLVCeBbJIMDvdJ8ghMbEakJ6_EQyvy... |