  Elite Veteran
  Beiträge: 922
       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... |