[Iska]

iccup.platoon@vk, для Microsoft SQL можно использовать в запросе на обновление данных разновидность функции CASE — т.н. search CASE function (CASE), для Microsoft Access — функцию Switch, наподобие:

Код:

UPDATE [NumberDisc] SET [NumberDisc].Discount = Switch([Amount]<=1,5,[Amount]<=10,10,[Amount]<=15,15,[Amount]>15,20);

но у меня нет уверенности, что сие сработает в Вашем варианте.

[lxa85]

iccup.platoon@vk, у меня получилось так:
Мы говорим CREATE - Query Design
Выбираем нужную таблицу и поле NumberDisc, Discount
Встаем на поле. В ленте DESIGN - выбираем Update
Встаем на поле Update To под Discount
Финт ушами - Ctrl + F2 - открывается Expression Builder
В него пишем

Код:

IIf([NumberDisc]![Amount]>=1 And [NumberDisc]![Amount]<10;5;
  IIf([NumberDisc]![Amount]>=10 And [NumberDisc]![Amount]<15;10;
    IIf([NumberDisc]![Amount]>=15 And [NumberDisc]![Amount]<20;15;
      IIf([NumberDisc]![Amount]>=20;20;-1
      )
    )
  )
)

OK, Run, Подтвердить.
Я на всякий случай делал копию таблицы, но она не пригодилась. Важных данных мы не потеряем.

Теперь как получить нормальную строчку.
Наступили слева в списке на Query.
View (на картинке) - SQL View
И там мы уже видим более привычную строчку SQL запросов.
Вот там можно попробовать способ, предложенный Iska, т.к. CASE он более правильный что ли, при множественном выборе.
Expression Builder мне его повторить не позволил.

Код:

UPDATE NumberDisc 
SET NumberDisc.[Discount] = 
IIf([NumberDisc]![Amount]>=1 And [NumberDisc]![Amount]<10,5,
    IIf([NumberDisc]![Amount]>=10 And [NumberDisc]![Amount]<15,10,
        IIf([NumberDisc]![Amount]>=15 And [NumberDisc]![Amount]<20,15,
            IIf([NumberDisc]![Amount]>=20,20,-1)
        )
    )
);

Форматирование мое, для наглядности.
Общая конструкция
«Expr» IIf(«expression»; «truepart»; «falsepart»)

[Iska]

lxa85, в самом Access можно использовать «Switch()», о чём я писал выше.

А вот что из предложенного будет работать извне, из-под Visual Studio в том же VB.Net, например, надо смотреть, пробовать.

[lxa85]

Iska, проглядел

[iccup.platoon@vk]

Иска - бог. Снова.

[Iska]

iccup.platoon@vk, так что именно у Вас заработало из-под VB.Net?

Иска - бог.»

Это совсем не так .