Для наших машин у нас есть несколько этапов проверки.Каждый этап должен быть «ОК» или «Н / Д», прежде чем мы сможем отправить машину клиенту.У меня есть несколько текстовых полей, где они заполняют, является ли конкретная фаза "OK" или "NOK" (не oke) или "N / A".
Если все "ОК" или "Н / Д", то MouldTotal.value="OK" Else MouldTotal.value="NOK"
Я не могу заставить это работать и не нашел способа, который подходит для этой ситуации.
Спасибо за любую помощь заранее.
Для первого приведенного ниже кода я получил совпадение типа ошибки 13.
If DryCycle_status.Value = "OK" Or "N/A" And Temp_status = "OK" Or "N/A" And _
BackPressure_status.Value = "OK" Or "N/A" And _
Filling_status = "OK" Or "N/A" And Injection_status.Value = "OK" Or "N/A" _
And HoldingPressure_status = "OK" Or "N/A" _
And CoolingTime_status.Value = "OK" Or "N/A" And ClampingForce_status = "OK" Or "N/A" And _
ProcessStability_status.Value = "OK" Or "N/A" And AdditionalTesting_status = "OK" Or "N/A" _
Then MouldTotal.Value = "OK" Else MouldTotal.Value = "NOK"
Я также попробовал приведенный ниже код.Этот не привел к ошибке, но также ничего не сделал с кодом.Похоже, что просто читать значение MouldTotal
.
Edit;кажется, что он только читает DryCycle_status
, потому что когда я изменяю это значение на «NOK», то MouldTotal
действительно меняется на «NOK».Когда я меняю любой другой «статус», это не влияет на MouldTotal
If DryCycle_status.Value = "OK" Or DryCycle_status.Value = "N/A" And _
Temp_status = "OK" Or Temp_status.Value = "N/A" And _
BackPressure_status.Value = "OK" Or BackPressure_status.Value = "N/A" And _
Filling_status = "OK" Or Filling_status.Value = "N/A" And _
Injection_status.Value = "OK" Or Injection_status.Value = "N/A" And _
HoldingPressure_status = "OK" Or _
HoldingPressure_status.Value = "N/A" And CoolingTime_status.Value = "OK" Or _
CoolingTime_status.Value = "N/A" And ClampingForce_status = "OK" Or _
ClampingForce_status.Value = "N/A" And _
ProcessStability_status.Value = "OK" Or ProcessStability_status.Value = "N/A" _
And AdditionalTesting_status = "OK" Or AdditionalTesting_status.Value = "N/A" _
Then MouldTotal.Value = "OK" Else MouldTotal.Value = "NOK"