VB中怎么通过拖动slider来改变MCI播放进度

VB中如何通过拖动slider来改变MCI播放进度
用VB MCI控件做的播放器，不能通过拖动slider来改变播放进度。拖动一下，slider就又回到原来位置了。

[解决办法]
拖动之后，MCI时间应该作相应调整，调整为slider的位置。