资源描述：
《基于vb与matlab集成技术的预测系统设计与实现》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。
1、基于VB与MATLAB集成技术的预测系统设计与实现第32卷 第1期河北理工大学学报(自然科学版)Vol132 No112010年2月JournalofHebeiPolytechnicUniversity(NaturalScienceEdition)Feb.2010:167420262(2010)0120034205基于VB与MATLAB集成技术的预测系统设计与实现陈丽芳,冯力静(河北理工大学理学院,河北唐山063009)关键词:集成技术;ActiveX;神经X络;预测;动态数据交换;组件摘 要:针对神经X
2、络预测系统的设计及实现进行了研究。在充分调研VB与MATALB各自优势的基础上,利用VB和MATLAB集成技术实现了预测系统的设计。该软件使用方便、快捷,用户通过界面输入预测参数后,能快速计算出预测结果。经仿真验证,预测效果较为理想。:TP311152 文献标志码:A0 引言预测是综合研究事物内在联系延续与突变的过程。这个过程实际上是:从过去和现在已知的情况出发,利用一定的方法和技术探索或模拟不可知的、未发生的、或复杂的中间过程,推断出未来的结果。[1]按其性质可把预测分为:定性预测(通过人的主观判断来预
3、测结果)、定量预测(时间序列法、回归分析法、神经X络法等)和综合预测(定性与定量预测的结合使用)。神经X络的快速发展为人们解决非线性预测问题提供了一个良好的途径。在构造神经X络和测试X络方面,MATLAB提供了工具箱,这无疑为科技工提供了很大的方便。[2,3]MATLAB是一个完整的数学平台,在这个平台上,用户只需寥寥数语就可以完成十分复杂的功能,大大提高了工程分析计算、图像处理的效率[4]。但考虑到工厂工作人员的实际情况,需要向他们提供一套界面友好使用方便的预测软件,显然MAT2LAB是不能胜任的。VB
4、是一种可视化的高级程序设计语言,能使开发人员快速方便地开发出友好的用户界面,是ATLAB等均支持ActiveXAutima2tion服务器协议,当使用MATLAB作为自动化服务器,其提供的自动化对象的外部名称为matlab1application。自动化控制器是使用和操纵自动化对象的应用程序或组件。常见的编程软件VB、C++、JAVA等均支持ActiveXAutomation控制端协议。例如,当需要使用MATLAB进行复杂的矩阵运算或图像处理时,可以在VB中调用MATLAB自动对象,得到指向MATLAB自
5、动化对象接口的指针,然后使用VB编写程序就可以调用MATLAB的命令,向MATLAB传送或从MATLAB接收矩阵数据,实现二者的数据交换与集成开发。MATLAB自动化服务器提供6种方法:(1)BSTRExecute([in]BESRmand)该函数以任何合法的MATLAB命令字符串作为输入参数,将运行结果作为字符串返回,从而实现在VB界面上执行MATLAB命令的功能,同时命令所产生的图形直接以MATLAB图形窗口的形式显示出来;(2)VOIDPutfullmatrix([in]BSTRName,[in]B
6、STRATLAB工作空间输出一维或二维数组。Name是VB应用程序希望向MATLAB输出的数组名,ATLAB中工作空间的名字,通常有3种取值:“base”,表示MATLAB默认工作空间:“global”,表示MATLAB全局工作空间:“caller”,用于MEX文件。.17.pr和pi为数组,分别是要向MATLAB工作空间输出的数组的实部和虚部。(3)VOIDGetfullmatrix([in]BSTRName,[in]BSTRATLAB工作空间获取一维或二维数组,各参数含义与Putfullmatrix命
7、令中对参数含义相同。(4)VOIDMinimizemandand窗口最小化;(5)VOIDMaximizemandand窗口最大化;(6)VOIDQuit但在实际应用中我们发现以上方法在应用过程中存在一定弊端,例如:矩阵形式在VB中输入困难、数据形式转换困难等。因此,实现过程中可以采用下面的数据交换方法。112 数据交换新方法该数据交换方法是:通过文件作桥梁,可以方便地实现VB与MATLAB之间交换数据。这种方法既便于理解也便于实现。[8]将VB中文本框中的字符串数据直接写到一个文件当中保存下来。具体作法
8、:Fhnd1=FreeFileOpen″d:。/num1txt″ForOutputAs#Fhnd1Print#fhnd1,Text11text 第1期 陈丽芳,等:基于VB与MATLAB集成技术的预测系统设计与实现35©1994-2011ChinaAcademicJournalElectronicPublishingHouse.Allrightsreserved..ki.Close#fhnd1这样文本框text1中的
