现有一个excel文件，内有一4×100的数据，我想在VB中建立一个四维数组a(4,100)，请问应该如何实现？谢谢！

[此贴子已经被作者于2006-10-12 8:13:06编辑过]

谢谢版主！突然又想到一个问题：如果在一个excel文件里面有多个表，比如在文件a.xls中有sheet1（4×100）,sheet2（2×50）两个表，我想把sheet（4×100）的数据写入vb中的数组a1（4×100）中，把sheet（2×50）的数据写入vb中的数组a2（2×50）中，请问应该添加哪些语句？

[此贴子已经被作者于2006-10-12 8:25:33编辑过]

噢，是不是把(1)改成(2)就可以了？

斑主啊，用了你的代码，在运行程序时，ＶＢ会自动打开所引用的那个excel文件，能不能修改一下代码，让程序运行时不打开所引用的excel文件呢？谢谢！

噢，谢谢了！斑主要是有时间的话能不能逐句解释一下啊？
还有一个问题：在引用excel文件时，斑主用的是绝对路径，要是用相对路径（excel文件和程序在同一目录下）应该怎么写呢？我用Set xlsworkbook = xlsApp.Workbooks.Open("\mat.xls")好像不行。

[此贴子已经被作者于2006-10-12 14:33:48编辑过]

谢谢斑主！我有一本《Visual Basic程序设计简明教程》(刘炳文编著　清华大学出版社)，不过里面关于数据库这一块并不详细，很多内容都没有。斑主能不能给推荐一本？

偶又想起一个问题：如果excel文件是一个加密的文件，在ＶＢ中应该添加什么语句才能读取这个文件？谢谢！