vb.net数字雨 vb输入数字( 三 )


2.MS Excel
说起报表设计应用程序,无意微软的Excel是一支独秀,MS Excel就是用来进行表格和报表设计用的应用程序,它具有优秀的方格控制和宏代码定制功能 。所以如果在设计自己的应用程序的时候能够结合到Excel的话,那么你的应用程序就应该是相当的完善了,因为无论是编辑还是打印功能,Excel都提供了很完美的解决方案,所以你的应用程序所要做的事情就是实现程序和Excel通讯即可 。
事实上,可以使用VBscript可以将VB与Excel两者连接起来 。以下就简要介绍在VB下开发基于Excel的编程思路 。
在VB中处理Excel的对象大致分为五个:Application对象、WorkBook对象、WorkSheet对象、Range对象以及Cell对象 。它们的功能分别如下:
Application---------用来指代整个应用程序 。
WorkBook----------表示工作簿对象
WorkSheet---------表示工作表对象 , 注意,一个工作簿可以包含多个工作表,它们就类似于多文档中的框架窗口和里面的单个视图一样 。
Range-------------表示工作表中的某个区域范围对象,特殊情况下也可以只代表一个Cell 。
Cell---------------表示特定工作表的一个单元格对象 。这个对象的使用频率是最高的 。
清楚了以上的五个对象的应用范围,那么使用它们就很简单了,不过在使用这些对象之前,首先需要对它们进行声明 。方法是在"工程"的"引用"对话框之下选择"Microsoft Excel9.0 Object Library" , 这样就将整个Excel对象库就引入到程序中来了 。
下面举一个示例,其实现的功能是打开一个工作簿 。
Function OpenBook(strFilePath As String) As Boolean
' This procedure checks to see if the workbook
' specified in the strFilePath argument is open.
' If it is open, the workbook is activated. If it is
' not open, the procedure opens it.
Dim wkbCurrent As Excel.Workbook
Dim strBookName As String
On Error GoTo OpenBook_Err
' Determine the name portion of the strFilePath argument.
strBookName = NameFromPath(strFilePath)
If Len(strBookName) = 0 Then Exit Function
If Workbooks.Count 0 Then
For Each wkbCurrent In Workbooks
If UCase$(wkbCurrent.Name) = UCase$(strBookName) Then
wkbCurrent.Activate
Exit Function
End If
Next wkbCurrent
End If
Workbooks.Open strBookName
OpenBook = True
OpenBook_End:
Exit Function
OpenBook_Err:
OpenBook = False
Resume OpenBook_End
End Function
3.Crystal Reporter(水晶报表)
做为一个优秀的报表软件,水晶报表是实际应用中最多的方案 。在这一节里主要介绍一下水晶报表的定制和显示,打印功能的实现 。
首先要区分Crystal Reports插件程序和Crystal Reports控件 。前者主要用来创建报表模板,后者主要是用来在程序中显示和打印报表 , 这两者的分工决定了它们程序中的功能的不同 。
其中Crystal Reports的插件程序可以从Seagate公司的官方网站上下载最新的测试版本 。
3.1 Crystal Reports插件程序的使用
选择"外接程序"菜单的"报表设计器"选项,则VB将执行Crystal Reports Pro插件应用程序 。在Crystal Reports Pro里选择"新建报表"图标,可以选择8标准模板和一个自定义的模板来开始报表工程 。
整个水晶报表的使用跟第一节的Data Report的使用很类似 。首先需要给报表选择数据源,(即数据库),然后就可以在报表中添加、删除、修改字段以及为记录分组,可以利用水晶报表创建很多具有自定义风格的报表 。由于本身Crystal Reports插件程序就是一个功能强大的报表设计软件,这里就不能一一的讲解了 , 有兴趣可以参考程序自带的帮助文档 。

推荐阅读