vb调用sub过程

下面是我写的程序：

Private Sub Command2_Click()
Dim n As Integer

s1 = Text1.Text '复读部分起始位置
s2 = Text2.Text '复读部分终止位置
Call sel1(0, s1) '播放复读的前面部分

num = Text3.Text
For n = 1 To num
Call sel2(s1, s2) '播放复读部分
Next n

Call sel3(s2) '播放复读的后面部分
End Sub

运行之后直接执行sel3（），是为什么？
程序怎么改？
Private Sub sel1(f1 As Integer, t1 As Integer) '循环前
MMControl1.From = f1
MMControl1.To = t1
MMControl1.Command = "play"
End Sub

Private Sub sel2(f2 As Integer, t2 As Integer) '循环部分
MMControl1.Command = "prev"
MMControl1.From = f2
MMControl1.To = t2
MMControl1.Command = "play"
End Sub

Private Sub sel3(f3 As Integer) '循环后
MMControl1.From = f3
MMControl1.Command = "seek"
MMControl1.Command = "play"
End

vb问题之sub过程 有关调用Sub过程的问题 VB过程这一章关于Sub的问题 sub过程！ 无效的过程调用或参数 （vb) 在vb中调用sql存储过程 Vb 调用Orcale存储过程+500 vb 调用过程中的不懂问题 HTML里的onClick能调用ASP程序里的SUB过程吗? vb中如何获得调用函数的过程的名字？