2014-12-21 2 views
0

Мне нужно создать значение в элементе управления текстовым полем при запуске определенного события, чтобы я мог повторно связать свои формы с другой схемой связей между хозяином и дочерним элементом. Это значение должно использоваться впоследствии для создания оператора if. По какой-то странной причине значение генерируется и форматируется правильно, но независимо от того, что находится в текстовом поле, оператор If не распознает это значение и знает его только как пустое. Я пробовал цифры, буквы, но все одинаково.Создание значения в элементе управления в форме

В моем примере ниже, после обновления управления (текстовое поле) «txtDeviation» к «1», по неизвестной причине не признаются в качестве значения 1.

Private Sub cmdSkillsTracking_Click() 

Form_frmValueChain01!frmValueChain02.SetFocus 
Form_frmValueChain01.Pagina370.Visible = False 
Form_frmValueChain01.Pagina371.Visible = True 

If txtDeviation01 < 1 Then 

    Form_frmValueChain01.Form.frmValueChain07.LinkMasterFields = "txtMicroProcess01e" 
    Form_frmValueChain01.Form.frmValueChain07.LinkChildFields = "ID" 

    Form_frmValueChain01.Form.frmValueChain17.LinkMasterFields = "txtSubProcessID" 
    Form_frmValueChain01.Form.frmValueChain17.LinkChildFields = "IDskillsmatrix" 

    Form_frmValueChain01.Form.frmValueChain16.LinkMasterFields = "txtSubProcessID" 
    Form_frmValueChain01.Form.frmValueChain16.LinkChildFields = "ID" 

Else 

    Form_frmValueChain01.Form.frmValueChain07.LinkMasterFields = "txtMicroProcess01f" 
    Form_frmValueChain01.Form.frmValueChain07.LinkChildFields = "ID" 

    Form_frmValueChain01.Form.frmValueChain14.LinkMasterFields = "txtMicroProcess01f" 
    Form_frmValueChain01.Form.frmValueChain14.LinkChildFields = "subprocessID" 

    Form_frmValueChain01.Form.frmValueChain10c.LinkMasterFields = "txtMicroProcess01f" 
    Form_frmValueChain01.Form.frmValueChain10c.LinkChildFields = "ID" 

    Form_frmValueChain01.Form.frmValueChain101.LinkMasterFields = "txtMicroProcess01f" 
    Form_frmValueChain01.Form.frmValueChain101.LinkChildFields = "ID" 

    Form_frmValueChain01.Form.frmValueChain07.LinkMasterFields = "txtMicroProcess01e" 
    Form_frmValueChain01.Form.frmValueChain07.LinkChildFields = "ID" 

    Form_frmValueChain01.Form.frmValueChain17.LinkMasterFields = "txtSubProcessID" 
    Form_frmValueChain01.Form.frmValueChain17.LinkChildFields = "IDskillsmatrix" 

    Form_frmValueChain01.Form.frmValueChain16.LinkMasterFields = "txtSubProcessID" 
    Form_frmValueChain01.Form.frmValueChain16.LinkChildFields = "ID" 
End If 
+0

Можете ли вы показать код для обновления текстового поля? на каком событии? – Roland

+0

'txtDeviation01' - переменная, используемая для хранения значения ваших текстовых полей? Потому что иначе вам нужно изменить это на 'me.txtDeviation01' или что-то – Jens

ответ

1

Две вещей Я вижу здесь;

  1. Поскольку вы используете меньше оператора, вы, похоже, хотите обработать это значение текстового поля как числовое. Если это так, вам нужно будет преобразовать текстовое значение в текстовое поле в числовое.
  2. Затем вам нужно прикрепить ссылку на текстовое поле «я».

Ваше заявление IF должно выглядеть следующим образом;

If val(me.txtDeviation01) < 1 Then 
... 
Смежные вопросы