请教：vfp6.0可以在表单添加音乐吗？

没人吗，还有请问一下你的小尾巴是怎么设置的？

　　　--你那么蠢 别乱跑了就待在我身边吧

1

添加一个OLE【MMControl多媒体】控件。
PROCEDURE 播放声音()
cWJ = "音乐表中曲目（路径和文件名）"
If .NOT.File("&cWJ") Then
cTS = "没有发现音乐文件【" + cWJ + "】。"
MsgBox cTS, 0 + 64, "系统提示"
Else
*　关闭正在播放的音乐
ThisForm.MMControl1.Command = "Close"
With ThisForm.MMControl1
.Visible = True &&　MMControl1 可见
.FileName = cWJ &&　指定声音文件
.Command = "Open" &&　打开多媒体文件
.Command = "Play" &&　播放多媒体文件
End With
End If
RETURN