заносить этот критерий в переменную, и ее подставлять при отборе данных ввиде критерия

Так, давай начнем с того, что вы расскажете как Вы отбираете данные? в запросе, через рекордсет, или при открытии формы...

Надо программно формировать строку запроса. В вашем примере можно писать так SELECT * FROM T1 Where Id In (Id1;Id2:Id3;...;IdN)
где Id1;Id2:Id3;...;IdN - это как раз значение листбокса.
А формировать строкеу можно так:
Dim SQLStr As String

SQLStr="SELECT * FROM T1 WHERE ID IN ("
SQLStr=SQLStr & Me.Listbox & ");"

А дальше либо присваивать эту строку рекордсету, либо запросу, либо рекордсорсу формы...