vb链接Word的实例

1、打开vb，添加工程，添加窗体

2、然后在工具中选择菜单编辑器编辑菜单

3、编辑好菜单后，然后选择菜单按钮，进入代码编辑区编辑如下代码：

4、Private Sub swflb_Click()Set xlApp = CreateObject("Excel.App造婷用痃lication")Set xlBook = xlApp.Workbooks.Open("d:\10.xls")xlApp.Visible = TrueSet xlSheet = xlBook.Worksheets("水文分类表")End Sub就可以在vb中打开Excel了