Hola, usa el evento click y change de los combos, cuando cambia el combo 1, entonces hace una busqueda en la base de datos, y muestra en el combo 2, te explico, si tienes una categoria, y dentro de esa categoria hay subcategorias, entonces, si categoria = combo1.text(el combo que tienen las categorias) entonces, combo2.clear (borras para que no se repitan los datos), luego
while basedatos.eof=false
if basedatos.recorset!categoria = combo1.text then
combo2.additem (basedatos.recorset!subcategoria)
end if
basedatos.movenext
wend
si sabes que cantidad de subcategorias son, tb puedes usar un for, para terminar de buscar y salir inmediatamente, otra cosa que puedes hacer es crear una variable llave, la cual puedes utilizar para que una vez que encuentre las subcategorias se incie, al al dejar de ser esta la que requieres, entonces, le cambias el valor y le pones salir, o : basedatos.movelast. Espero te sirva.