|
|
TranslateExpressionTranslateExpression
Diese Funktion ist in folgenden Access-Versionen verfügbar: 2000, 2002, 2003, 2007, 2010
Wandelte eine übergegeben Zeichenfolge in einen gültigen Ausdruck um. Dabei wird sämtlicher "Whitespace" entfernt.
Function TranslateExpression(In As String, Out As String, ParseFlags As Long, TranslateFlags As Long) As Boolean
True, wenn die Ausführung erfolgreich verlaufen ist.
Dim strIn As String
Dim strOut As String Dim lngParseFlags As Long Dim lngTranslateFlags As Long strIn = " 7 + Me!MeinFeld" strOut = "" lngParseFlags = 0 lngTranslateFlags = 0 WizHook.Key = 51488399 If WizHook.TranslateExpression(strIn, strOut, lngParseFlags, lngTranslateFlags) _ = True Then MsgBox strOut Else MsgBox "Aktion fehlgeschlagen!" End If
Bei meinen Test war es egal, welcher Wert für TranslateFlags eingegeben wurde. Ich konnte keine Auswirkungen feststellen.
|
02.10.2020: 06.11.2019: 06.05.2017: 27.03.2016: 23.05.2014: |
|
|