计算机心音听诊教学系统的开发

孙浩 绵阳市第三人民医院 （四川 绵阳 621000）

计算机心音听诊教学系统的开发

孙浩 绵阳市第三人民医院 （四川 绵阳 621000）

本文描述了计算机心音听诊教学系统的实现方案。系统包含五部分和六个板块，以数据库为基础，采用数字声音技术，能以多种方式播放心音并显示对应的心音图和心音说明，克服了传统教学方法的不足。系统中还介绍了心音听诊知识，使用Visual Basic作为开发平台，后台使用Access数据库储存数据。在系统中通过VB控件Adodc来连接窗体与数据库。心音的播放则是使用了WindowsMediaPlay控件，并且有指示线指示心音播放的进度。

计算机辅助教学 心音 Access数据库 数字声音技术

心音听诊是诊断心血管疾病的一种简单、重要的方法。心音图是将心脏听诊形象化，并能将超过听觉敏感范围的声音记录下来。心音图结合心脏听诊，可帮助学习者掌握心音变化规律和丰富听诊内容，可通过看图与听诊之间的反复实践，促进临床听诊教学的发展。笔者采用VisualBasic结合Access数据库的方法来开发这一系统。

1.设计思路

相比VC++、Flash等软件来说，VB具有语言简单、界面选择余地大、控件丰富灵活等特点，是开发本系统的理想平台[1～2]。

心音音频的播放可使用Windows自带的播放工具或API函数实现；心音图用VB中的PictureBox控件来显示，同时在PictureBox上添加指示线并用Timer控件加以编程来实现音频播放与心音图同步显示的功能[3～6]。而要实现在系统中添加、修改和删除数据等功能就要建立一个数据库。Access数据库与VB有很好的兼容性，对于小容量的数据存储是一个理想的工具[7]。笔者采用只存储文件路径的方法来解决数据库庞大的问题。

2.系统结构及功能

本系统包括五大部分、六个板块：

（1）听诊部位：结合图片介绍心音听诊中常用的五个部位以及它们在人体体表的具体位置。另外还介绍了一般听诊顺序。

（2） 听诊口诀：介绍了医学上常用的26条心脏听诊口诀。

（3）动画演示：运用动画方式展示心音特点、心音图，播放心音音频，并根据心音播放的进度用指示线在心音图上同步指示出来。

（4）动画演示数据库：在第（3）板块的基础上设置添加、修改、删除等，进入此板块需要密码登陆。

（5）心音听诊文字说明数据库：展示不同心音（包括正常心音和病变心音）的详细特征描述，并具添加、修改、删除等功能，进入同样需要密码登陆。

（6）系统说明：方便使用者快速了解系统结构和功能。

3.功能实现

在系统六大板块中，动画演示板块是实现方式最复杂的板块，其设计方法也可运用于其他板块，因此本文选择其作为重点介绍。

首先，要实现浏览心音名称、心音特点说明、查看心音图、播放心音音频文件、指示线与音乐同步进行等功能，需用到了VB中的ADODC、CommonDialog和WindowsMediaPlayer等控件。

（1）数据库连接对象——Connection

每一次引用数据库可以建立一个连接对象，然后在其上建立多个RecordSet，方便远程连接的操作。下面程序就是建了这样一个连接对象，并通过ODBC DSN打开数据库以及关闭连接的方法：

Dim ADOCon As New ADODB.Connection

ADOCon.Open"provider=microsoft.jet.oledb.4.0;data source=" &

App.Path & "db1.mdb;persist security info =false"

ADOCon.Close

（2）数据集对象——Recordset

Recordset对象表示的是来自基本表或命令执行结果的记录全集。使用ADO时，通过Recordset对象可对几乎所有数据进行操作。使用以下程序实现RecordSet对象的创建、打开：

Dim ADORst As New ADODB.Recordset ’声明

Dim ADOString As String ’打开纪录集

ADORst.Open (ADOString)

（3）指示线的控制

对指示线的控制包括定义对象的移动速度、幅度、初始位置等：

Timer1.Interval = 12000 /(picBox.Width /18)

Timer1.Enabled = True

Line1.X1 = 0

Line1.X 2 = 0

Line1.X1 = Line1.X1 + 20

Line1.X 2 = Line1.X 2 + 20

（4）在程序中，Adodc1作为与数据库的连接，可以通过它对数据进行浏览，使用语句“Set Adodc1.Recordset = ADORst”使之连接到记录集上。语句

ADOCon.Open "provider=microsoft.jet.oledb.4.0; datasource=" &

App.Path & "db1.mdb;persist security info =false"

实现了Adodc1到Access数据库的连接。其中db1. mdb为数据库名，App.Path用来取它的路径。

（5）实现WindowsMediaPlay播放心音音频

WMP.URL = Trim(ADORst.Fields("sound").Value)

（6）实现Combox控件的功能

Dim ADOString As String

ADORst.Close

'使combox控件显示“心音名称”字段

ADOString = "select * from test1 where 心音名称=" & "'" &

Combo1.Text & "'"

ADORst.Open (ADOString)

（7）设置用户登陆名和密码

为保护系统数据库的安全，需要在某些板块中设置访问权限：

1 Private Sub Command1_Click()

2 If Text1.Text = "" And Text2.Text = "" Then '设置"登陆名称"和"

密码"值

3 frmTshujk.Show '显示frmTshujk窗体

4 Unload Me '退出登陆窗体

5 Else

6 MsgBox "请正确输入'登陆名'和'密码!" '显示错误提示

7 End If

8 End Sub

在开发本系统时需要特别注意两个问题：（1）当Access与VB无法链接时需将Access修改为旧版本（97版）；（2）当使用的VB版本中没有MediaPlayer控件时，需要使用Package & Deployment Wizard工程打包发布的方法实现来心音文件的播放。

[1] 刘甫迎. VB教程[M]. 成都:电子科技大学出版社, 1999:25-30.

[2] 张立科. VB6.0数据库开发技术与工程实践[M]. 北京:人民邮电出版社, 2004:27-28.

[3] 肖守中, 肖仪华, 裴建华, 等. 心音计算机模拟[J]. 微电子学与计算机, 1991,20(6):43-44.

[4] 喻红宇. Windows下声音文件的多种调用播放方法[J]. 中国经济和信息化, 1996,12(3):85-87

[5] 卢耕, 心音信号的分析研究[J]. 中国生物医学工程学报, 1993,12(1):50.

[6] 于云之, 聂邦畿. 心音的临床意义及研究现状[J]. 生物医学工程学杂志, 1991,9(3):9-12.

[7] 姚普选. 数据库原理及应用(Access)[M]. 北京:清华大学出版社, 2002:77-78.

The Development Of Computer-aided Teaching System of Heart Sounds Auscultation

SUN Hao The Third Hospital Of Mianyang (Sichuan Mianyang 621000)

This paper details the implementation scheme of the computer-aided heart sounds auscultation teaching system. The system includes fve parts and six sections. By means of digital sound technology it can realistically play all kinds of heart sounds in many ways. Each heart sound is demonstrated by a proper explanation of its characteristics and a heart sound graph,So it can gets over the shortages of traditional teaching method. Besides,there are some knowledge about heart sound auscultation in this system.Visual Basic is used to be the base of the system,and all of the data that used in system is deposited in Access.Database and forms are connect by Adodc(VB control).The WindowsMediaPlay is used to play Heart Sound,and a line will tell you which part the music playing.

computer-aided teaching, heart sound, access database, digital sound technology

1006-6586(2017)06-0012-02

R318.6

A