求一段精简的播放MP3和MIDI的代码

Question

我想写一个模块，包含几个函数1、playmudis(music as string) '播放文件
2、pause(参数) '暂停指定播放的文件
3、stop(参数）'停止指定播放的文件请问如何用最简洁的代码写出以上模块呢，我看了很多文章都是写得很冗长。希望高手赐教。

Answer 1

晕！靠！！
内容太长，分开回复！ 我弄了好久就这个结果！！！
退回去后却一片空白。气死我了！以前在vb下弄过mp3播放器。还挺实用。
就是看起挺别扭。
lz要要可以发源码给你。就是怕你看不明白。
因为整个搭建的结构太复杂了点。模拟了winamp的好多效果。

Answer 2

我只要实现非常简单的几个功能，
1\播放指定文件，
2\暂停
3\停止
没有什么特别要求,只需要一个模块或类代码什么的,没有必要要楼上所说的什么模拟WINAMP代码的

Answer 3

我的网站上有用API实现的媒体播放器。http://j2soft.008.net/VB资料－>查询“媒体播放”即可。

Answer 4

出错是 因为timer控件取播放位置太频繁了，我也不想用这个播放器做什么，所以根本没改过，我只是想让你看看通过API函数播放歌曲的例子，并不是想给你一个完整的播放器。