AND / AndAlso с Or / OrElse путаница
Мне нужно убедиться, что в первом элементе есть запись. (Это импорт файла CSV). Предполагаемое действие: если Item (471)). ToString пусто, но есть значение> 0 в сообщении Item (475)). ToString) или Item (479)). ToString) о необходимости указания даты.
Я пробовал несколько способов и не могу заставить это работать. Если я возьму оператор OrElse и использую только один из двух, он сработает. Я запутался в правильном синтаксисе, чтобы заставить это работать. Может кто-нибудь указать мне правильное направление?
If (MyList.Items.Item(471)).ToString = "" And CDec((MyList.Items.Item(475)).ToString) > 0D OrElse CDec((MyList.Items.Item(479)).ToString) > 0D Then
MessageBox.Show("FUELING DATE #1 CANNOT BE BLANK", "Critical Warning", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
Else
tbDate1.Text = (MyList.Items.Item(471)).ToString
End If
Если вы запутались, то это потому, что вы недостаточно хорошо слушали в классе математики, когда вас учили о приоритете операторов. В булевой логике AND имеет приоритет над OR, поэтому вы должны использовать круглые скобки, если хотите, чтобы оператор OR оценивался перед оператором AND. Это точно такая же ситуация, когда мы используем круглые скобки для вычисления сложения перед умножением в базовом арифметическом выражении.
Что касается выбора между And / Or и AndAlso / OrElse, это не имеет отношения к этому вопросу. Любой из них будет работать в этом конкретном случае, но вы всегда должны работать по следующему правилу: ВСЕГДА используйте AndAlso / OrElse, если вы специально не хотите короткого замыкания, и, если вы не хотите короткого замыкания, вам, вероятно, следует переосмыслить свой дизайн, чтобы избежать этого.
Ответы 1
If (MyList.Items.Item(471)).ToString = "" AndAlso (CDec((MyList.Items.Item(475)).ToString) > 0D OrElse CDec((MyList.Items.Item(479)).ToString) > 0D) Then
MessageBox.Show("FUELING DATE #1 CANNOT BE BLANK", "Critical Warning", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
Else
tbDate1.Text = (MyList.Items.Item(471)).ToString
End If
Короче
If condition1 AndAlso (condition2 OrElse condition3) Then
Моя общая ошибка заключалась в том, что я забыл, что мне нужна скобка вокруг моего оператора OrElse. Спасибо за помощь.
Что за путаница, "короткое замыкание"
AndAlso / OrElse?IF 1 = 0 And 1 = 1оценит оба условия, даже если знает, что первое условие неверно. В случаях, когда функция находится в вашей if-строке, это может привести к неожиданным результатам.IF 1 = 0 AndAlso 1 = 1" checks 1 = 0, принимает значение false и отбрасывает ветвь if. То же самое и сOr, который оценивает все условия, даже если сначала успешно.OrElseпродолжает движение вперед только в том случае, если ему все еще нужно найти совпадение. Вы можете сделатьIf ToyInBox("truck") OrElse ToyInPocket("truck"),ToyInPocket()проверяется, только еслиToyInBox()ложный