在Visual Basic 6.0中实现自动播放VCD