1、打开vb软件,创建工程,创建窗体
2、在工具菜单中选择菜单编辑器,然后编辑菜单,编辑好菜单后,选择菜单按钮
3、选择菜单后进入代码编乩态祗嚆辑窗口,Private Sub swflb_Click()Set xlApp = CreateObject("Excel.Applic锾攒揉敫ation")Set xlBook = xlApp.Workbooks.Open("d:\10.xls")xlApp.Visible = TrueSet xlSheet = xlBook.Worksheets("水文分类表")End Sub编辑如下代码后,就可以打开Excel表格了