勾勾选选也能做专业报表?看看本程序的功能吧:
专业报表生成器使用说明
1.'查看'按钮的功能:便于新手学习和掌握各选项的代码.
2.'本页合成'按钮的功能:便于新手学习和掌握各页代码的合成情况.
3.'查看代码'按钮的功能:便于用户在勾选或输入相关选项后,自动生成报表代码,如复制代码到
命令窗口中,只需点'复制代码'按钮,然后到命令窗口中按:'ctrl + v ' 便可以复制.
4.'生成报表'按钮的功能:使用本程序生成报表,也便于用户掌握相关控件在代码中的关联及使用方法.
上述文件中,再加上下列代码,放在在窗口的
AfterLoad事件中,便可以自动设置本程序中所有表名及电脑中所有打印机名的列表项目了
For each bm as DataTable In DataTables
dim Tex As String
Tex= Tex & "|" & bm.name
Dim com7 As WinForm.ComboBox = e.Form.Controls("ComboBox7")
com7.ComboList = Tex
Next
For Each p As String in InstalledPrinters
dim Tex1 As String
Tex1= Tex1 & "|" & p
Dim com6 As WinForm.ComboBox= e.Form.Controls("ComboBox6")
com6.ComboList = Tex1
Next
[此贴子已经被作者于2009-7-27 9:31:09编辑过]