近年来, 各级各类学校的宣传工作与时俱进, 大多建立了自己的校园电视台, 融合进越来越多的高新技术, 科技含量也在不断提高。在校园电视台的工作实践中, 经常要涉及播放各种格式的视频内容, 实时插播字幕 (通知、祝福、广告等) , 采用传统的DVD机播放与字幕机结合的方式就显现出视频格式限制多、重复工作多、管理不方便效率低的弊端。现代化的校园电视台需要用现代化的管理方法和技术手段, 因此, 作为学校的信息技术人员, 使用好网络时代播放系统, 适应学校科学发展, 就显得非常紧迫和非常必要了。
下面就笔者在工作中用VB软件编写带字幕功能的视频播放器作一介绍。
1 系统的功能组成
整个系统由“视频播放”、“实时字幕”两个功能组成。
1.1“视频播放”模块
该模块主要完成对大多数音视频文件实现按需播放, 包括:WMV、RMVB、AVI、MPG、VOB等。
1.2“实时字幕”模块
该模块可在进行视频播放的同时, 实时地在屏幕下方滚动播出字幕, 通过校园电视系统传播到教室、寝室供同学们适时观看。
2 主要的设计与实现
首先, 打开Visual Basic, 在"文件"菜单中, 单击"新建工程"。在"新建工程"对话框中, 单击"标准EXE"。单击"确定"如图1。
在“工程”菜单中, 单击“部件”, 给我们的工程添加两个部件“Windows Media Player”、“Microsoft Common Dialog Control 6.0 (SP6) ”, 给我们添加控件做好准备。如图2。
选择Form1窗体, 在Form1窗体中添加2个Label控件, 1个CommandButton控件, 1个TextBox控件, 1个Timer控件, 1个CommonDialog控件和1个WindowsMediaPlayer控件,
安放位置如图3, 属性设置分别见表1。
第二步, 我们要输入代码来实现各种功能。
因为播放器的功能需要, 我们把FORM1窗体的BorderStyle设为None, WindowState设置为Maximize, 这时窗体就没有关闭、最大化和最小化按钮了, 所以需要给播放器增加退出功能, 双击“command1”控件, 加入代码
因为视频画面的需要, 我们将“command1”控件的Visible属性设为“False”即“command1”控件不可见, 所以要关闭播放器时, 必须让“command1”控件显示出来, 笔者的思路是通过双击滚动字幕来实现, 代码如下:
我们要让字幕动起来, 就需要给Timer1加入以下代码
字幕肯定不能一成不变, 如何输入新的内容呢?笔者的思路是通过敲击“Enter”, 将在“Text1”中输入的新内容传送到Lable1, 实现的代码如下:
到此, 请按”F5”运行, 带字幕功能的视频播放器就可以使用了, 见图4。
3 结束语
本文介绍了带字幕功能的视频播放器的主要的设计与实现开发技术, 该播放器对各校园电视台具有一定的实用价值, 并对其它需使用字幕的软件有参考价值。主要改进方向是字幕美化, 即在字幕中能显示图片、Flash、视频等更多的元素。
摘要：现代化的校园电视台需要用现代化的管理方法和技术手段, 本文就学校校园电视台用VB尝试编写带字幕功能的视频播放器的应用作出探究, 并指出了改进的方向。
关键词：字幕功能,视频播放器,VB