Article ID: 105127
Article Last Modified on 10/11/2006
'*************************************************************
'Declarations section of the module.
'*************************************************************
Option Explicit
'===============================================================
' The following function CanPass28 will be accepted when entered
' into a validation rule
'===============================================================
Function CanPass28 (a, b, c, d, e, f, g, h, i, j, k, l, m, n, o, _
p, q, r, s, t, u, v, w, x, y, z, a27, b28)
Dim Parm28, Parm29 'These 3 lines are
Parm28 = Mid(b28, 1, InStr(b28, ";") - 1) 'explained in
Parm29 = Mid(b28, InStr(b28, ";") + 1) 'step 5.
End Function
'===============================================================
'The following function CannotPass29 will give an error message
' when used in a validation rule
'===============================================================
Function CannotPass29 (a, b, c, d, e, f, g, h, i, j, k, l, m, n, _
o, p, q, r, s, t, u, v, w, x, y, z, a27, b28, c29)
End Function
-1 = CannotPass29 (1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16, _
17,18,19,20,21,22,23,24,25,26,27,28,29)
Notice that you receive the error message "The expression you entered
is too complex" in version 7.0 or "Expression Too Complex" in versions
1.x and 2.0.
-1 = CanPass28 (1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16, _
17,18,19,20,21,22,23,24,25,26,27,28)
Note that you do not receive an error message.
-1 = CanPass28(1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16, _
17,18,19,20,21,22,23,24,25,26,27,28&";"&29)
The last two parameters are separated inside the function by searching
for the semicolon with the following lines from the function created in
step 1:
Parm28 = Mid(b28, 1, InStr(b28, ";") - 1)
Parm29 = Mid(b28, InStr(b28, ";") + 1)
Keywords: kbprb kbprogramming kbusage KB105127