参考答案：

解析：True (2)x As Single (3)2+sin(x) (4)2+cos(x) (5)Timer1.Enabled=False

[分析]：试题七 本题涉及两个技术要点。一是利用图像框在窗体中的动态定位实现简单动画，一是利用多媒体控件播放声音文件。 在窗体中，为了便于实现图像框的定位，一般需要先建立自定义的坐标系统。 在主窗体加载过程(Form Load)中，采用语句： Seal(0，o)-(20，6) 就为该窗体设置了自己的坐标系统，左上角坐标为(0，0)，右下角坐标为(20，6)。

X轴在屏幕上边，从左至右，从0到20。Y轴在屏幕左边，自上而下，从0到6。 在该坐标系统中，曲线y1=2+sin(x)与曲线y2=2+cos(x)成为互绞的两条曲线。 对曲线上的每一点(x，y)，它与屏幕左边的距离为x，与屏幕顶端的距离为y。因此，蝴蝶1图像框的位置应按：Image1.Leff=x，Image1．ToDF2+sin(x)进行动态调整；蝴蝶2图像框的位置应按：Image2.Leff=x，Image2．Top=2+cos(x)进行动态调整。 初始时，蝴蝶1的位置应在：Imagel.Leff=O，Imagel.Top=2；蝴蝶2的位置应在： Image2.Leff=0，Image2.Top=3。 建立两个图像框时，不仅应注意其初始位置，还应注意设置其属性：stretch属性应设置成True，才能使指定图像经过自动缩放后放在该框内。图像框中显示的图像文件由属性Picture决定。因此，在准备好两个蝴蝶图像文件后，就应记住其存储的文件名和路径，设置图像框的Picture属性时就可以选择相应的路径和文件名。 由于应用需要每隔0.1秒调整蝴蝶的位置，因此，开发时应设置一个定时器，默认命名为Timer1。该定时器的interval属性(定时的时间间隔)应设置成100(以毫秒为单位)，Enabled属性应设置成False(初始时定时器处于关闭状态，待单击“启动”按钮后再打开)。定时器在开发时可以在窗体内看到，但在运行时看不到。 为了在应用程序运行中播放声音文件，需要使用VB中的多媒体控件。该控件平时不在工具箱中，应在开发时利用菜单“工程-部件”，选择加载“Microsoft Multimedia Control 6.0”后，才会在工具箱中出现。 在窗体中设置了多媒体控件后，首先应按题中的要求，将其名称改为MMC，并将其Visible属性改为False，使该控件在运行时不可见(不需要用户控制)。一个多媒体控件中包括许多按钮，例如“播放”、“停止”、“暂停”、“快进”、“倒带”、“录音”等。右击该控件，选择“属性”，在弹出的对话框中，再选择“控件”标签，在其中可以为各个按钮设置其有效性和可视性。按本应用要求，可以设置“播放”和“停止”按钮的有效性，使其余各项都处于不选中状态。 在程序代码中，可以通过设置多媒体控件的属性值来使其发挥作用： 多媒体控件的属性 值 含义 DeviceTyne WaveAudio 该多媒体设备类型能播放WAV格式声音 AviVideo 该多媒体设备类型能播放AVI格式视频 FileName ***** 指定播放的文件名(包括路径) Command OpeI 打开多媒体设备 Play 播放 Record 录制 Stop 停止播放 Pause 暂停播放或暂停后继续播放 Prev 返回当前播放文件的起点 Close 关闭多媒体设备 该应用的程序代码应包括如下4个过程： 1)主窗口加载过程，其功能为定义自己的坐标系统。 2)“启动”按钮执行的过程，用以设置多媒体设备类型，指定所播放的声音文件名，打开多媒体设备，播放声音文件，设置蝴蝶的初始位置，打开定时器。 3)定时器定时执行的过程，每隔0.1秒对两个蝴蝶图像框的位置进行一次调整。 两只蝴蝶的位置(x,y1)和(x,y2)取决于变量x。初始时，x=0，位于窗口左边。每隔0.1秒，x增加0.1。当x＞20，蝴蝶处于窗体右边之外时，执行x=x-20，蝴蝶将会出现在窗体左边。 4)“停止”按钮执行的过程，其功能是：关闭定时器，两只蝴蝶定位在窗口左边初始位置，停止播放声音文件，关闭多媒体设备。 由于单精度实数变量x在多个过程中使用，可将其放在各过程之外作为全局变量进行声明。 注意，窗体坐标系统的值、蝴蝶飞行曲线、x值每步增加的值、定时器的时间间隔等都需要在反复调试的基础上逐步调整得到比较合适的值。 在VB应用程序中播放指定的音频(或视频)文件，这种技术很实用，学员应学会并推广应用。