[VB.NET]轻松控制Excel

轻松控制Excel

实例说明

在本实例中，我们制作一个能够建立和打开Excel文档的应用程序。程序运行结果如图76-1所示。

图76-1 运行结果

技术要点

l 添加Excel库

l 新建/打开Excel文件

实现过程

<script type="text/javascript"><!--google_ad_client = "pub-8333940862668978";/* 728x90, 创建于 08-11-30 */google_ad_slot = "4485230109";google_ad_width = 728;google_ad_height = 90;//--></script><script type="text/javascript"src="http://pagead2.googlesyndication.com/pagead/show_ads.js"></script>

■ 新建项目

打开Visual Studio.NET，选择"新建项目"，在项目类型窗口中选择"Visual Basic项目"，在模板窗口中选择"Windows应用程序"，在名称域中输入"ControlExcel"，然后选择保存路径。单击"确认"。

■ 添加控件

选择菜单"项目|添加引用"，在弹出的"添加引用"对话框中选择COM选项卡，选中"Microsoft Excel 10.0 Object Library"，单击"选择"按钮，即可将Excel库加入到当前项目中。添加时的界面如图76-2所示。然后，给窗体上添加两个Label控件和两个Button控件，两个TextBox控件。

图76-2 添加Excel引用

■ 设置属性

对窗体及控件进行属性设置。在本实例中，我们只需将窗体和各个控件的Text属性设置为和界面一致即可。

■ 添加代码

'新建Excel文档

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim excel As New Excel.Application()

Dim chart As New Excel.Chart()

excel.Visible = True

excel.NewWorkbook.Add(TextBox1.Text)

End Sub

'打开Excel文档

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Dim excel As New Excel.Application()

excel.Visible = True

excel.Workbooks.Open(TextBox2.Text)

End Sub

■ 运行程序

单击菜单"调试|启动"或单击 图标运行程序。

小结

本实例我们先引用了Excel库，然后新建Excel对象，就可以实现与Excel的连接了，在本实例中我们只是介绍了新建和打开文件的方法，其他方法读者可以自行研究。