VB6, Visual Basic 6, Получить значение поля (колонки) текущей строки рекордсета (ADODB.Recordset)

rcd - рекордсет (ADODB.Recordset)
UM - имя поля (колонки), значение которого нужно получить
0 - индекс поля (колонки), значение которого нужно получить
cn - соединение с базой данных (ADODB.Connection)

sq = "SELECT TOP 1 UM FROM r_Prods
rcd.Open sq, cn, adOpenStatic

MsgBox rcd!UM ......(Вариант 1)
MsgBox rcd(0).Value ......(Вариант 2)

Теги: VB6, Visual Basic 6, Получить значение поля (колонки) текущей строки рекордсета (ADODB.Recordset)