决策支持系统与专家系统_试验4

《决策支持系统与专家系统_试验4》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、华北电力大学科技学院实验报告实验名称专家系统课程名称专业班级：信管09K1学号：091906040103指导教师：张学斌学生姓名：范欣然成绩：实验日期：2012-10-24一、实验目的和要求1.复习vb6.0的语法和程序编写2.复习VB6.0数据库应用程序使用3.复习线性冋归的概念4.使用VB6.0编写最小二乘法模型程序二、实验环境VB6.0ACCESS2003三、实验内容和步骤本实验是验证性实验，按照提示步骤验证程序。路径为参考路径，可自行修改。（1）编写最小二乘法模型程序1•在c:jxzcyzjxtjczcxtsj目录下新建ACCESS数据库文件cb

2、yc.mdbo表格信息如卜表名:tjsj字段名称数据类型说明id自动编号在表中添加一条记录时，该字段可自动输入连续数据X数字每批投入产品件数（百件），字段大小为整形y数字产品成本（百元），字段大小为单精度表tjsj的数据id1234567X53918749149878y53.4284.5380.8752.4525.687.1272.93id891011121314X82583345521668y76.555.144149.5153.1626.2266.04表名：CS字段名称数据类型是否卞键说明a数字否一元线性回归模型常数项，字段大小为单精度型b数字否一元线性冋

3、归模型常数项，字段大小为单精度型2.在c:jxzcyzjxtjczcxt冃录下新建名为mx（模型）的子目录。在mx子目录下新建名为zxecf（自小二乘法）的子目录。在zxecf子目录下新建名为ywj（源文件）的子目录；在zxecf子目录下新建名为mbwj（目标文件）的子目录。3•启动vb6.0中文版4•在启动界面中选择“标准exe”选项后，单击“打开”按钮。1.在“工程”界面中，单击“保存”按钮。2.在弹出的“文件另存为”对话框中，选择文件保存路径为c:jxzcyzjxtjczcxtmxzxcefywj,同时指定窗休文件名为“zxcef.fnn

4、”（也可以自己指定其他名称），单击“保存”按钮。3.在弹出的“工程另存为”对话框中，指定工程文件名为“”（也可以自己指定其他名称）。单击“保存”按钮。&在弹出的“信息提示”对话框中，单击“No”按钮。9.单击菜单栏上的“工程”■“添加模块”选项，该模块用于存放模块级变量及用户自定义的通用过程。10.在弹岀的“添加模块”对话框中，单击“打开”按钮。11.出现“Model”窗口。同时窗口右侧的任务窗格中也增加了一个“模块”文件夹。12.在右侧属性窗口修改模块的名称为“zxecf”。然后单击工具栏上的“保存”按钮。llodulelModule二^按壬爭手檢分类辱I（

5、名称）13.在弹出的“文件另存为”对话框中指定模块文件名为“zxecf.bas”，选择文件保存路径为“c:jxzcyzjxtjczcxtmxzxcefywj”。然后单击“保存"按钮。9.单击菜单栏上的“工程”-“引用”选项，弹出“引用”对话框。在对话框中勾选aMicrosoftActiveXDataObjects2.8Library”选项和"MicrosoftActiveXDataObjectsRecordset2.8Library＞，选项。然后,单击“确定”按钮。可用的引用(A):DataDataDataDataUDJgetsObjectsObje

6、ctsObjectsMicrosoftMicrosoftMicrosoftMicrosoftMicrocrosoActiveXActiveXActiveXActiveXAcXi-veX-J^k4-G^-0bjj^cXs2.02.12.52.62.7LibraryaLibraryLibraryLibrary_LibraryActiveXDwtaObjecbrary确定匚彳取消

7、浏览•…

8、Microso£tMicrosoftMicroxoftMicroso£t肚、—xcucG*ADOExt.2.8forDDLandSecxirit;AdorndClientServ

9、iceComponent1.IAgontControl2・0AgentServer2.0&bar**•*-so>-tzovv♦acu、cf»u夕C帮助QD

10、忧先级MicrosoftActiveXDataObjectsRecordset2.8Library定位：C:ProgramFilesVCommonFilesVsystemadomsador15・dll语言：标准10.双击任务窗格屮的“zxeef”模块，在弹出的zxecf(Code)“代码编写”界面屮编写程序代码。(代码片段1)11.单击菜单栏上的“工程”•“工程1属性”选项，弹出“工程属性”对话框。将

11、“通用”标签下的“启动对象”属性修改为