Страницы: 1
RSS
Скрытие пользовательской формы по значению в текстбоксе, С кнопки скрывается, по изменению текстбокса ﹘ нет
 
Здравствуйте!
Есть файл регистрации данных с двумя формами. Из одной совершается ввод данных, другая ﹘ подтверждающая. Подтверждающая форма с текстбоксом (а не сообщение с кнопками "Ok" и "Cancel") была создана потому, что подтверждение должно поступать со сканера ШК.
Последовательность действий пользователя такова. Ввод данных в несколько полей первой формы > ввод кода подтверждения в последнее поле > появление формы подтверждения ("Ты всё правильно сделал?") > ввод того же кода подтверждения в текстбокс второй формы ("Да, я всё сделал правильно!") > закрытие формы подтверждения и вывод первой формы для следующего пользователя.
Проблема. Подтверждающая форма отказывается закрываться по условию ввода в текстбокс определенного значения (три девятки), если открыта форма ввода. При этом прекрасно закрывается данным способом, если форма ввода скрыта. Или ﹘ при открытой форме ввода, но ﹘ с кнопки. На кнопку повешен точно такой же макрос, как и на текстбокс.
Вопрос. Какой очевидный косяк проходит мимо меня?

P.S. Форму ввода просили максимально обезличить, так что работает только последний контрол. Жать на зеленую капу.
Изменено: vastsv - 21.07.2016 12:59:14
 
так у вас там написано не скрыть а показать:
Код
 Private Sub txbLSSEnter_Change()
    If txbLSSEnter.Text = "999" Then
        txbLSSEnter.Value = ""
        usfmSystemTransferAlert.Show
    End If
End Sub
Живи и дай жить..
 
Слэн,  именно. Строка вызывает вторую форму, в которую надо повторно ввести штрихкод с тремя девятками. Вот с её уходом -- как раз таки проблема. Не моя блажь, а паранойя руководства. И зная наш контингент -- вполне оправданная.
 
Код
Private Sub txbTransferConfirm_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If txbTransferConfirm.Text & Chr(KeyAscii) = "999" Then
        txbTransferConfirm.Value = ""
        txbTransferConfirm.SetFocus
        usfmSystemTransferAlert.Hide
End If

End Sub
так работает
Живи и дай жить..
 
Слэн, спасибо!
Страницы: 1
Наверх