Получить максимальное значения поля в БД - VB

Узнай цену своей работы

Формулировка задачи:

Добрый день, знатоки! Подскажите пожалуйста, как мне реализовать следующую задачу: В таблице Access есть таблица Table. Там есть поле Pole1. С помощью запроса (использую ЭУД Data потому что прога не большая, и она вполне выполняет все нужные действия и его свойств вполне достаточно)?
получаю максимальное значение из поля Pole1. Вот теперь, как это полученное значение присвоить метке Label1 ? Если свойства DataSourse установить dtaPole1, а DataField установить Pole1 в окне свойств, то VB ругается. Подскажите как правильно? P.S. тут у меня идея вот в чем. Нужно получить максимальное значение из этого поля. За тем при добавлении новой записи, к полученному максимальному значению прибавить 1 и нужно чтобы при сохранении записи, это новое значение сохранилось в этом поле (Pole1) Всем спасибо за отклик

Решение задачи: «Получить максимальное значения поля в БД»

textual
Листинг программы
dtaMax.DatabaseName = App.Path & "\Test.mdb"
dtaMax.RecordSource = "Table1"
dtaMax.RecordSource = "SELECT DISTINCTROW Max([Table1].[Pole1]) AS [Max - Pole1] FROM Table1"
dtaMax.Refresh
dtaMax.Recordset.MoveLast
lblMax_Pole1.Caption = dtaMax.Recordset.Fields("Max - Pole1").Value

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

6   голосов , оценка 4.167 из 5
Похожие ответы