【vb精品源码栏目提醒】:以下是网学会员为您推荐的vb精品源码-【精品】-Excel学籍信息自定义函数库的开发 - 综合课件,希望本篇文章对您学习有所帮助。
本栏目责任编辑代影数据库技术ComputerKnowledgeandTechnology电脑知识与技术第6卷第21期2010年7月Excel学籍信息自定义函数库的开发肖飞刘耿龙眭伟芳徐州工业职业技术学院江苏徐州221140摘要基于VBActiveXDLL动态链接库和OfficeVBA技术实例说明实现Excel学籍信息自定义函数库的编程方法及其分发和使用的完整过程。
关键词Excel自定义函数库VBAVBActiveXDLL学籍信息中图分类号TP317文献标识码A文章编号1009-3044201021-5698-02DevelopmentofExcelFunctionLibraryforStudentStatusInformationXIAOFeiLIUGeng-longSUIWei-fangXuzhouCollegeofIndustrialTechnologyXuzhou221140ChinaAbstract:ThepapershowanexampleofstudentstatusinformationtocreateacustomExcelfunctionlibraryofprogrammingandthedis-tributionandusingbasedonVBActiveXDLLDynamicLinkLibraryandOfficeVBAtechnology.Keywords:ExcelcustomfunctionlibraryVBAVBActiveXDLLstudentstatusinformationExcel作为最流行的数据处理应用软件之一在高校学籍数据的日常管理工作中得到广泛使用。
通过其内置的OfficeVBA以下简称VBA技术实现自定义函数库以下简称函数库功能能够有效减少重复性数据操作提高工作效率尤其适合于团队管理。
源于函数库存在分发复杂、源代码不易保密特别是在操作敏感数据时等方面的弱点结合VBActiveXDLL以下简称DLL和VBA技术可以有效地解决上述弱点其工作原理如示意图1所示。
1目标需求及实现方式1.1需求以现有MicrosoftSQLServer的学籍数据库为数据来源在Excel中使用函数库函数返回从学籍数据库中实时读取的学生、班级相关数据。
函数库分发采用标准安装包形式安装后允许用户激活或关闭函数库。
1.2实现方式用户端运行函数库安装包安装包自动完成DLL文件注册和Excel加载宏文件的定位存储用户在Excel中通过加载或撤销加载宏文件以激活或关闭函数库功能。
2目标设计2.1数据表定义在已有学籍信息数据表中学籍学生、班级数据表tb_xs、tb_bj定义描述如表1、表2。
2.2函数定义实例中的Excel自定义函数库中包含xsxx和bjxx函数分别读取学籍数据库返回所需学生和班级相关数据函数定义描述如表3。
3开发过程3.1函数库引用所需ActiveXDLL运行
VB6创建一个ActiveXDLL工程命名为XLS_SSFL默认类模块命名为GetSS增加一个模块命名为mdl_SS工程引用“MicrosoftActiveXDataObjects2.5Library”用以访问数据库。
收稿日期2010-05-19作者简介肖飞1970-男江苏徐州人讲师研究方向为教育管理、教育管理创新性研究刘耿龙1975-男江苏徐州人工程师研究方向为数据库系统及教育管理应用软件开发眭伟芳1977-女江苏徐州人工程师研究方向为数据应用图1Excel自定义函数库工作原理示意图表1学籍数据库学生数据表tb_xs定义描述表2学籍数据库班级数据表tbj定义描述ISSN1009-3044oputernowledgeandTechnology电脑知识与技术Vol.6No.21July2010pp.5698-56995706E-mail:jsltcccc.net.cnhttp://www.dnzs.net.cnTel:86-551-569096356909645698数据库技术本栏目责任编辑代影ComputerKnowledgeandTechnology电脑知识与技术第6卷第21期2010年7月模块mdl_SS中存放数据库操作对象主要代码如下PublicobjCnnAsADODB.Connection数据库连接对象PublicobjRssDODB.Recorset数据库表记录集对象类模块GetSS的Initialize和Terminate事件中分别对obCnn和obRs对象进行实例化和销毁操作。
在类模块GetSS中定义公共函数DLL_xsxx和DLL_bjxx分别作为Exce加载宏文件中生成xsxx和bjxx函数的引用函数主要代码如下公共函数DLL_xsxx定义PubicFunctionDLL_xsxxByVastrXHAsStringyVangParametersAsLongAsStringobCnn.OpenProvierSQLOLEDServer127.0.0.1UsaPw123456atabaseDXJ连接SQLSrvr数据库DXJobRs.Opnsctxmxbsfzhbmcromtb_xswherexhstrXHobCnnaOpenKeysetaLockReaOny查询数据表tb_xs中指定学号的学生学籍记录IfobRs.RecorCount1Then学号不惟一DLL_xsxx存在重复学号。
无返回值提示EseSeectCasenParameters按参数值返回指定字段值Case1234DLL_xsxxIIIsNuobRsnParametersobRsnParameters返回值CaseEse不在可用参数值范围内DLL_xsxx错误参数值。
无返回值提示EnSeectEnIobRs.Cose关闭记录集obCnn.Cose关闭数据库连接公共函数DLL_bxx定义与DLL_xsxx定义类似不再详列。
完成后生成XLS_SSFL.文件。
3.2Excel加载宏文件运行Exce使用Vsuaasc编辑器创建一个模块命名为V_SS引用生成的XLS_SSFL.创建Exce的自定义函数xsxx和bxx主要代码如下自定义函数xsxxFunctonxsxxyVastrCe_XHsStrnyVanParameterssLonsStrnDmCLS_xsxxsXLS_SSFL.GetSS定义对象CLS_xsxx引用XLS_SSFL中的类模块GetSSSetCLS_xsxxNewXLS_SSFL.GetSS实例化对象CLS_xsxxxsxxCLS_xsxxstrCe_XHnParameters返回函数值EnFuncton自定义函数bxx与xsxx定义类似不再详列。
完成后保存为Exce加载宏扩展名xa文件文件名以容易识别或记忆的字符命名为宜3.3生成分发安装包分发安装包的主要目的是实现自定义函数库在用户端的快速部署同时能够提供卸载功能安装包内容为DLL和加载宏文件利用安装包制作工具完成DLL的本地化注册和加载宏文件在OceIns中的存储可以选择自动或通过安装脚本识别OceIns目录的安装包制作工具4安装和使用4.1安装在运行安装包前关闭所有已运行的Exce实例由安装文件自动完成DLL文件的本地化注册和加载宏文件在OceIns目录的存储4使用运行Exce在加载宏列表中选择存在的3.1生成的加载宏文件名称通过Exce函数调用语法调用实例生成的xsxx和bxx函数实例函数运行结果如图2、图3。
5结束语实例自定义函数库在Exce2000/2003/2007中测试通过。
下转第5706页表3Excel中函数定义描述图2实例xsxx函数运行结果图3实例bjxx函数运行结果5699本栏目责任编辑代影数据库技术ComputerKnowledgeandTechnology电脑知识与技术第6卷第21期2010年7月上接第5699页在针对高校学籍数据的日常管理中注重对数据的快速处理和敏感性数据如学生身份证号、联系方式等的保护使用DLL和VBA技术的自定义函数库功能在符合上述需求的前提下同时为团队管理所需数据共享提供了技术保障是扩展Excel应用的方向之一。
参考文献1Microsoft.HowToUseADOwithExcelDatafromVisualBasicorVBAEB/OL.http:support.microsoft.comkb257819en-us2MicrosoftVisualBasicConceptsCreatinganActiveXDLLEBOLhttp:msdnmicrosoftcomenuslibraryaa229332vVS.60aspx3MicrosoftMicrosoftExcelVisualBasicReferenceEB/OLhttp://msdnmicrosoftcom/enus/library/aa272254voffice11aspx4刘辉浅析ExcelVBA在开发小型管理信息系统中的应用J.电脑知识与技术200955李军贠新华胥辉
VB实现简单随机抽样的DLL开发及应用J电脑知识与技术200956李晓玫杨小平Excel中的VBA程序设计J四川师范大学学报:自然科学版200447许礼捷ActiveXDLL技术在ASP源代码保护中的应用J沙洲职业工学院学报200823.3系统功能实现3.3.1购买彩票流程使用移动彩票终端在主界面图1点击所需购买彩票种类按钮以二十选五为例进入“20选5”界面图2。
在“20选5”界面选中“购买本期20选5”按钮进入“购买本期20选5”界面输入需购买彩票号码如图4在确定购买彩票后选中“确定购买”按钮此时移动彩票终端设备中的无线手机模块将购买彩票号码通过GPRS网络传到WebServices服务器上WebServices服务器将数据进行解析将数据写入福彩后台服务器然后将确认信息返回移动彩票终端此次购买结束。
3.3.2查询功能在主界面选择相应的彩票种类再选择“查看往期开奖情况”按钮此时移动彩票终端将查询请求通过无线手机模块发到GPRS网络上再将请求转到WebServices服务器上然后WebServices服务器使用查询语句从福彩数据库中查询到往期开奖情况再有WebServices服务器将查询到的结果经过GPRS网络发到移动彩票终端的SQLITE数据库上在终端上可以看到查询结果。
如图5。
4结论和展望福彩和体彩是我国合法发行的彩票自诞生起到现在为我国的福利事业和基础体育事业起到了功不可没的作用。
随着科技的不断发展尤其是3G技术的成熟和WebServices的广泛应用。
为彩票业也注入了新鲜的血液本文我们针对福利彩票设计出一种基于WebServices的移动彩票系统该系统具有灵活方便的特点可以让用户随时随地的购买彩票。
既方便了用户也使彩票销售有了新的增长点。
论文中设计的移动彩票终端既可以安装在个人掌上设备也可以安装在配套硬件上方便不适合设立彩票点的偏远地区。
随着技术的不断完善我们可以将该系统运用在电力、税务、零售业等多个领域这样极大的方便了群众的生活也为我国的现代化建设起到了推动作用。
参考文献1BryantRE深入理解计算机系统M北京:中国电力出版社20042薛大龙陈世帝WINDOWSCE嵌入式系统开发从基础到实践M北京:电子工业出版社20083葛声胡春明杜宗霞基于WebServices的应用支撑环境研究与实现M北京:机械工业出版社2002:971024傅晓彩博会展示移动彩票投注系统产业融合带来新机遇EB/OLhttp://sportspeoplecomcn/GB/31928/34802/34807/3271222html5王保义张少敏XML构建安全的WebJ计算机应用200496张李洁郭乐深陈俊亮下一代Internet移动业务的搜索模式C2003年中国通信学会信息通信网络技术年会20037查敦林王宁生供应链信息技术架构研究M北京:中国机械工程出版社20058PapazoglouMP.Web服务:原理和技术M.龚玲译.北京:机械工业出版社2010.图4移动彩票程序20选5购买界面图5移动彩票程序20选5查询界面5706