# Re: 如何让mid音乐重覆run

Posted by panya on May 03, 1998 at 20:30:42:

In Reply to: 如何让mid音乐重覆run posted by Antonio on May 03, 1998 at 02:48:37:

: 弟是vb新手,我想用回圈,但又不知要设多大的回圈才适合
: 因为,不知mid的时间和会停留多久,但弟试了一下 ,还是只有一次耶..
: For i = 0 To 3
:
媒体播放.音乐.Command = "close"
If MMControl1.Mode = mciModeStop Then
媒体播放.音乐.filename = App.Path + "\背景音乐\music000.mid"
:
媒体播放.音乐.Command = "play"
: end if
Next i

: 是否可请各位先进指正,谢谢!!
试试看

Follow Ups:

- Re: 如何让mid音乐重覆run Antonio 19:44:17 5/04/98 (1)
  - Re: 如何让mid音乐重覆run Magician 19:20:55 5/18/98 (0)