求助！计数查询后排序如何实现。

400131

现有如下表1
产品名        故障名        故障机器        故障时间
aaa        零件磨损        1号机        2004-1-21
bbb        操作失误        2号机        2004-1-22
bbb        零件磨损        1号机        2004-1-22
ccc        操作失误        4号机        2004-1-24
ddd        短路        2号机        2004-1-25
ccc        零件磨损        1号机        2004-1-26

我要得到如下查询结果该如何设计？
故障名         故障件数(件)
零件磨损          3
操作失误          2
短路                1

另外，象上面的查询结果我要在VBA中用 Dlookup来调用查询结果该如何做？
比如说我在一个窗体上设计了六个文本框，然后分别给他们赋值。
text1=零件磨损      text2=3
text3=操作失误      text4=2
text5=短路            text6=1

拜托高手赐教！

zhengjialon