Access程序设计在OLYMPUS全自动生化分析仪中的应用.pdf

实用医技杂志2004年10月第11卷第10期上半月版JPM—T—,Octob—er．—2004L旦!LJl，N堕三!垒 OLYMPUS全自动 Access程序设计在 生化分析仪中的应用 白振宇，何 理，白 燕，卢占勇 (平顶山煤业集团总医院，河南平顶山467000) [摘 要]目的：探索利用Microso[t Access数据库软件自身携带的VBA编程功能实现对已有数据 产生的数据资料进行统计和分析。方法：通过Microsoft 资料自动导入，并根据需要建立相应报表。结果：可以根据所选日期非常迅速地导入数据资料，大大提高了对已有资料 的利用效率。 [关键词]MicrosoftAccess；全自动生化分析仪；数据库 Form—Load() Microsoft PrivateSub Access是一个优秀的可视化数据库程序设计 软件，它很适合中小型数据库程序的设计开发。由于它对数据 DoCmd．Maximize Dim 的操作灵活，窗体、报表设计方便快捷，因此应用较为普遍。在 i AsInteger Dim As 临床实验室中，常常需要将各种仪器测定的数据进行统计和 dat，Y，m，dString For TO30 i一0 分析。我科室分别于1999年、2002年购买了日本OLYMPUS AU400，OLYMPUS AU2700型两台全自动生化分析仪，两 台机器的中文系统程序可以根据临床需求制作出相应的报告 单，但在对病人资料的汇总与统计中缺乏灵活性。利用 Access97和自身携带的VBA编程功能将中文系统的数据信dat=dat+Y+m+d 息导出，根据医院与科室的具体情况设计相应程序，使数据可 Next 以汇总和统计，能更加自由地利用已有数据资料。因此相应地 cmbselectdate．RowSource—dat AU机器的性能。 cmbselectdate．SetFocus 扩展了整台0LYMPUS 1仪器及设备 cmbselectdate．Text—Date 1．1 OI。YMPUS EndSub 仪器 Au系列全自动生化分析仪及其中 文系统系统软件(北京科迈公司制作)。 2．1．4在按钮的单击事件中加入以下代码： Access97。 PrivateSub 1．2数据库软件Microsoft btninput--Click() 2方法 0nErrorGoToErrhandle 2．1 acTable。’7 7’ 在装有MicrosoftAccess97的中文系统计算机上打开DoCmd．DeleteObjectpation--info Access空数据库，然后创建窗体和必要的控件。此处的窗体 DoCmd．DeleteobjectacTable。’’sample--dat’