怎样利用mciSendString得到文件播放当前位置?
我这样写为什么不行?
Private Sub Timer1_Timer()
Dim t As Long
Dim ret As String * 128
t = mciSendString("status " + mfn + " position", ret, 0, 0)
...全文
1575打赏收藏
兄弟姐妹们救我一命吧!
怎样利用mciSendString得到文件播放当前位置? 我这样写为什么不行? Private Sub Timer1_Timer() Dim t As Long Dim ret As String * 128 t = mciSendString("status " + mfn + " position", ret, 0, 0)