Форумы HiProg.com - MS ACCESS, VBA, VB

 

Ответить на сообщение

Вернуться к теме

Вы отвечаете на сообщение:

ник: glebozzzz
Доброго всем времени суток!
Есть таблица:

КодНак Продукция Тара
20449 Свинина п/т п/туши
20449 Хвосты свиные гофр/кор.
20449 Печень свиная гофр/кор.
20449 Почки свиные пакет п/э
20449 Сердце свиное гофр/кор.
20449 Язык свиной гофр/кор.
20449 Уши свиные гофр/кор.
20449 Колтык свиной пакет п/э
20449 Шкурка свиная пакет п/э

как можно сотворить сборку строки вида: 1)п/туши; 2),3),5),6),7)гофр/кор.; 4),8),9)пакет п/эт

Сейчас строку творю так (в VB).

StrNum = 1
With rst
    .MoveLast 'Заполнение набора записями
    .MoveFirst 'Возврат в начало
    Do Until .EOF
        Str = ![Тара]
        FullStr = FullStr & StrNum & ")" & Str & "  "
        StrNum = StrNum + 1
        .MoveNext
    Loop
    .Close
End With

А вот какой бы алгоритм придумать для сборки нужной строки?
Заранее благодарен за помощь, если кто откликнется.


Ваше имя:

Пароль:

Цитировать: [quote][/quote] Код: [code][/code]
Жирный: [b][/b] Наклонный: [i][/i]
URL: [url][/url] 

Сообщение:

 Размер файла не более 50 Кбт. Большие файлы можно размещать на www.slil.ru

Прикрепить:

 

Для вставки смайлов в текст щелкните по значку.