VB 怎样利用mmcontrol录制指定长度的声音文件？

这是我写的代码：
    MMControl1.TimeFormat = 0
    MMControl1.From = 0
    MMControl1.To = 2000
    MMControl1.Command = "record"
    MMControl1.Command = "save"
    MMControl1.Command = "close"

用来录制2秒的内容并自动保存，但这样录制瞬间就结束了。本人菜鸟哈，对record命令还不太会用。。。求解怎样录制指定长度的声音，并且录制完成后自动保存？ --------------------编程问答-------------------- 好失望。。。 。。。 --------------------编程问答-------------------- 用MMControl.tracklength试试

补充：VB ,  控件