ListBox с ссылками

[Sp1inter]

Доброго времени суток
Вопрос следующий, на форме создал листбокс, данные он берет из запроса (список тренеров конкретного отделения в спортшколе), так вот, по нажатию на фамилию тренера нужно чтобы вылетал другой запрос содержащий список его групп.
Так вот, не могу придумать как реализовать "ссылку" из листбокса
Подскажите пожалуйста...

[Sp1inter]

Либо сделать рядом второй листбокс, и по нажатию фамилии тренера в первом листбоксе вылетал список групп этого тренера в соседнем листбоксе...
Подскажите плиз, это последняя преграда в создании БД ))

[Daramant]

Следует поступить следующим образом:
Опиши класс, в котором будешь хранить информацию, необходимую для, определения списка групп, принадлежащих данному тренеру.
Я предполагаю, что для этого достаточно ID тренера, поэтому описал только одно поле CoachID. (добавь сам, если еще что-то понадобится).

type
  TInf = class
  public
    CoachID: Integer;

    constructor Create(aCoachID: Integer);
    destructor Destroy; override;
  end;

Реализация класса.

{ TInf }

constructor TInf.Create(aCoachID: Integer);
begin
  CoachID := aCoachID;
end;

destructor TInf.Destroy;
begin

  inherited;
end;

Затем, в коде, где ты заполняешь ListBox, немного изменим способ добавления. Надо сделать так:

  // получаем из БД список тренеров
  // что-то типа SELECT CoachID, CoachFamily FROM TCoaches
  // затем в цикле заполняем ListBox
  ListBox1.AddItem(CoachFamily, TInf.Create(CoachID));

CoachFamily - фамилия тренера из БД.
CoachID - ID тренера из БД.

Затем, когда необходимо получить информацию о списке групп, пишем:

  with TInf(ListBox1.Items.Objects[ListBox1.ItemIndex]) do
      CoachID // ID выделенного тренера

Т.е. у нас есть ID выделенного в данных момент тренера, используем его в sql-запросе и получаем список групп.

P.S.

по нажатию на фамилию тренера нужно чтобы вылетал другой запрос содержащий список его групп.

Для этого помести код в обработчик события OnClick.

P.S.2
Виноват, не увидел, что нужно на VBA.

[Sp1inter]

Спасибо за ответ
Запросы уже есть, причем оба, просто сделать между ними "линковку и все"
Первый запрос (тот на основе которого листбокс) - по двум стобцам, Фамилия тренера и Название отделения, на экран выводится только Фамилия тренера.
Второй запрос состоит из 3 столбцов, Фамилия тренера, Название отделения и Группы. На экран выводятся только группы. Задача написать простенькую программку на ВБ, такую что при нажатии фамилии тренера из листбокса, например Иванова И.И. откроется второй запрос со списком его групп.
Либо вместо второго запроса, что лучше, будет второй листбокс, в котором при нажатии на имя тренера, выскочит список его групп (откроется второй запрос)
В общем как то так, подскажите плиз по подробнее, уже всю голову сломал, последнии воспоминания о вб это первый-второй курс универа...

[Teslenko_EA]

Здравствуйте Sp1inter.
выбор в первом списке, обновляет запрос второго списка с условием отбора по первому.
Евгений.

[Sp1inter]

Евгений! Спасибо, сейчас посмотрю!

[Sp1inter]

Еще вопрос, в таблице учащиеся есть столбец "разряд", имеет фиксированный набор данных, начиная с первого заканчивая мастером спорта.
Есть запрос, который показывает список выбранной группы(выбираем в листбоксе название группы и тыкаем кнопку, вылетает запрос с составом). Вот рядом с ним хорошо бы сделать надпись на форме(или кнопку), которая будет показывать итог по группе, сколько каких разрядов в группе, пример:

5 человек - МС
2 человека - КМС
10 человек - 1 разряд

Подскажите как реализовать плиз

[Daramant]

Подскажите как реализовать плиз

Поможет следующий sql-запрос:

SELECT t.Rank, COUNT(t.Rank) AS RankCount FROM Table1 AS t WHERE t.GroupID = 1 GROUP BY t.Rank

Получишь список пар: разряд - количество людей им обладающих, для группы с GroupID = 1.

[Teslenko_EA]

Здравствуйте Sp1inter.
Запросы MS Access допускают использование VBA функций в своем теле.
Евгений.

[Sp1inter]

Ребят, обоим вам человеческое спасибо, завтра буду пробовать сейчас котелок не варит...
Евгений, знаю, но с вба я на ты...