初学菜鸟求救SLIDER空间改变MP3播放时间的问题

请问如何利用SLIDER的拖动来改变音乐的播放时间呢？
我的思路是
private sub slider1_click()
dim now as long
dim endtime as long
dim ret
mp3play1.stop
now=slider1.value
endtime=mp3play1.getwave....(就是那个获得时长的)
err=mp3play1.formto(now,endtime)
但是每次移动进度条歌就停了，然后就没动静了
请高手指出错误，谢谢了
--------------------编程问答-------------------- 1.把now这个命名改为其他的，2.mp3play1.stop这里停止了，后面得打开继续运行

补充：VB ,  基础类