在Word 97中编制一个视频播放程序
首先打开ＷＯＲＤ９７的ＶＩＳＵＡＬ ＢＡＳＩＣ编辑器（ＡＬＴ＋Ｆ１１）。在“工程”窗口内插入用户窗体，在“属性”中修改窗口属性，将窗体命名为ＦＬＶＣＤ，ＣＡＰＴＩＯＮ值为“风流视霸９７”。
其次，打开“查看－工具栏”，在“工具－附加控件”中，选中“ＡＣＴＩＶＥ ＣＯＮＴＲＯＬ ＯＢＪＥＣＴ”项。这样工具栏中就增加了ＡＣＴＩＶＥ控件，并将这个控件增加到ＦＬＶＣＤ窗体中。同时，在窗体中增加一个按钮，命名为“打开文件”。
双击“打开文件”按钮，输入：
Ｐｒｉｖａｔｅ Ｓｕｂ ＣｏｍｍａｎｄＢｕｔｔｏｎｌＣｌｉｃｋ（）
ｆｌｖｃｄ．Ｈｅｉｇｈｔ＝２５６（使文件播放时窗体高度变大）
ＡｃｔｉｖｅＭｏｖｉｅｌ．ＦｉｌｅＮａｍｅ＝ＩｎｐｕｔＢｏｘ（“请输入视频文件名：”，“风流软件工作室”，“Ｃ：＼１＼ｍｕｓｉｃ０１．ｄａｔ”）
──注意这里的“Ｃ：＼ｌ＼ｍｕｓｉｃ０１．ｄａｔ”是存在硬盘上的视频文件
Ｅｎｄ Ｓｕｂ
最后，试运行这个窗体，可以反复调整ＡＣＴＩＶＥ、及按钮的位置到最合适的位置，并加入一些美化窗体的文字。
如果想把这个程序加入到ＷＯＲＤ工具栏中，则可创建一个宏：
ｓｕｂ风流视霸
ｆｌｖｃｄ．ｓｈｏｗ
ｅｎｄ ｓｕｂ
再将这个宏做成按钮加入ＷＯＲＤ工具栏中。