欢迎光临
我们一直在努力

用dao打开excel文件_visualbasic教程

建站超值云服务器,限时71元/月

OptionExplicit
DimDbAsDatabase
DimRsAsRecordset

PrivateSubForm_Load()
SetDb=OpenDatabase(“c:\temp\book1.xls”,False,False,”Excel8.0;”)
SetRs=Db.OpenRecordset(“sheet1$”)
EndSub

PrivateSubForm_Unload(CancelAsInteger)
Rs.Close
Db.Close
EndSub

这是最简单的办法,详细的使用方法及限制请参看VBOnLineHelp,资料存取物件手册、取得外部资料、使用试算表一章。->

赞(0)
版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com 特别注意:本站所有转载文章言论不代表本站观点! 本站所提供的图片等素材,版权归原作者所有,如需使用,请与原作者联系。未经允许不得转载:IDC资讯中心 » 用dao打开excel文件_visualbasic教程
分享到: 更多 (0)