numero formato letra

This commit is contained in:
Hector
2021-08-03 18:40:41 -07:00
parent 76da800a00
commit 65abb0d194

View File

@@ -925,7 +925,7 @@ Namespace Extensiones
If y = 4 Then
If (Mid(entero, 4, 1) <> "0") Or
(Mid(entero, 4, 1) = "0" And Len(entero) = 4) Or
(Mid(entero, 4, 1) = "0" And (Len(entero) >= 4 And Len(entero) <= 6)) Or
(Mid(entero, 5, 1) <> "0" And Len(entero) = 5) Or
(Mid(entero, 6, 1) <> "0" And Len(entero) = 6) Or
(Mid(entero, 5, 1) = "0" And Len(entero) = 7) Or