VB源码：波形显示与声音效果