День добрый Уважаемые.
Вопрос следующий:
Форматирую отчет, на поле1 стоить маска ввода и условие пример: если поле1 = True то маска ввода такая то, если поле1 = False то маска - другая. Так вот, при первом срабатывании условия - код работает, все последующие строки не проходят проверку. При чем если меняю условия на простой вывод результата через MsgBox то все работает, отрабатывает каждую строку правильно.
4 строки В результате должно получится: True False False True
в примере 1 получается True False False False - не правильно
в примере 2 получается True False False True - правильно
1: Работает не корректно:
Private Sub ОбластьДанных_Format(Cancel As Integer, FormatCount As Integer)
Dim k As Boolean
k = поле1.Text Like "*ф"
If k = False Then
поле1.InputMask = "\№ 999-У\/??"
Else
поле1.InputMask = "\№ 999-??"
End If
End Sub
Работает корректно:
Private Sub ОбластьДанных_Format(Cancel As Integer, FormatCount As Integer)
Dim k As Boolean
k = поле1.Text Like "*ф"
If k = False Then
MsgBox k
Else
MsgBox k
End If
End Sub
Как решить?