VB中怎么将excel中数据赋值给数组

VB中如何将excel中数据赋值给数组
假设在D:\data路径下有一个名为cmd的excel表格(3行40列),怎样将这一表格中的数据赋值给一个数组?谢谢了!!!

------解决方案--------------------
http://www.google.com.hk/search?hl=zh-CN&newwindow=1&safe=strict&biw=1900&bih=1013&q=vb+%E8%AF%BB%E5%8F%96excel+%E6%94%BE%E5%85%A5%E6%95%B0%E7%BB%84&oq=vb+%E8%AF%BB%E5%8F%96excel+%E6%94%BE%E5%85%A5%E6%95%B0%E7%BB%84&aq=f&aqi=&aql=&gs_sm=e&gs_upl=32344l33203l0l3l3l0l0l0l0l203l500l0.2.1
------解决方案--------------------
这个问题的关键在于怎么读出Excel
你看看这个例子,搞懂了它就没有问题了:
http://download.csdn.net/source/2341786