请问谁有[mp3play.ocx]部件 - VB6论坛

编程论坛 → 开发语言 → 『 VB6论坛』 → 请问谁有[mp3play.ocx]部件

标题：请问谁有[mp3play.ocx]部件

取消只看楼主

b13690976754

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9
结帖率：100%

问题点数：0 回复次数：4

请问谁有[mp3play.ocx]部件

我在网上找很多有病毒的直接点来论坛问问谁有
有的请发上来好吗？谢谢~能超过30秒的吗？？？？

[此贴子已经被作者于2007-2-15 12:18:40编辑过]

搜索更多相关主题的帖子: ocx　

2007-02-15 11:24

b13690976754

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9

得分:0

最近版主休息了还是没有人知道问题答案？

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If

2007-02-15 14:42

b13690976754

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9

得分:0

谢谢

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If

2007-02-15 21:32

b13690976754

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9

得分:0

Private Sub Command1_Click()
MP3Play.Open("c:\music\6.mp3"," ")
Mp3Play.Play
End Sub

请问一下这段代码有什么问题么？为什么执行不了？老是说缺少=

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If

2007-02-15 21:43

b13690976754

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9

得分:0

谢谢

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If

2007-02-15 23:44