3.3 心音图的动态显示
播放心音时，在屏幕上同时显示相应的心音图可以增强用户对各种心音的理解记忆。为了能够随时在心音图上指示当前播放的位置，本系统使用了如下的方法：
(1)从数据库的“心音长度”字段中获得所播放的波形文件的长度；
(2)根据波形文件长度和心音图宽度计算出播放指示线每秒移动的距离(为了简化数据库结构及减少编程工作量，本系统采用固定的宽度显示心音图)；
(3)使用VB的定时器控件来控制播放指示线的移动速度，这样即可使播放与指示线的指示协调一致。
3.4 动态增减菜单选项
由于系统采用数据库来存储心音及相关数据，并且数据库的数据可以随时添加、删除及修改，这就要求系统在运行时应当根据数据库中的记录，动态增删“心音听诊训练”这个下拉式菜单中的菜单选项。此类菜单的制作不能单靠VB的菜单设计窗口来实现，还需要在程序中设计菜单控制数组，以实现动态加入或删除菜单命令项的功能。具体实现方法如下：
用菜单设计器设计“心音听诊训练”主菜单，然后再设计一个动态调整的子菜单，设置其属性如下：
Caption=” ′标题显示为空白
Name=“xinyin”
Index=0
Visible=False ′使其为不可见菜单
Enabled=True
由于菜单设计器要求在子菜单中至少要有一个为可见菜单，为此我们可以设计子菜单的第一项为菜单分隔条，并设置其Visible属性为True，这样不会影响整个菜单的结构。
在系统主窗体的Form_Load()过程中加入下面的程序：
Sub Form_Load()
Dim xyindex as Integer
xyindex=0
打开数据库
Do
xyindex=xyindex+1
