国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 學院 > 開發設計 > 正文

用MediaPlayer控件做一個MP3播放器

2019-11-18 17:29:30
字體：大 中 小
來源：轉載
供稿：網友
對VB初學者來說，做MP3播放器最為難的是控件了：千辛萬苦找來了一個控件，用起來卻一點也不痛快——不是有時間限制，就是功能不齊全，除非你交錢！其實，我們不必舍近求遠，WIN98就有一個寶貝：MediaPlayer！這個控件支持多種音樂格式，而且絕對免費，用它做出的MP3播放器最合適不過了！

　　方法如下：

　　新建標準EXE工程，窗體就用默認名稱好了，Caption為“土人MP3”或別的，將其BorderStyle屬性設為1，MinButton設為True；添加一個MediaPlayer控件、一個公共對話框和一個Text控件；接下來在窗體上畫五個按鈕，分別命名為：cmdPlay，cmdPause,cmdContinue,cmdNext,cmdStop,Caption依次為播放、暫停、繼續、下一曲、停止。好，下面就是編寫代碼了：

->'初始化程序
PrivateSubcmdStop_Click()
MediaPlayer1.Stop
cmdPlay.Enabled=True
cmdPause.Enabled=False
cmdContinue.Enabled=False
cmdStop.Enabled=False
EndSub
->

　　怎么樣？代碼不算多，一個自己的MP3播放器就做成了！這個MP3播放器只占用具2％的資源，播放質量并不見得比Winamp差，是不是很誘人？

　　說明：

　　1.*.m3u文件應該是大家所認識的，就是Winamp之類的播放器的播放文件列表，我們完全可以用記事本編輯它（打開一個此類的文件看看，沒什么神秘的）。

　　2.以上程序在VB6.0，Win98第二版下調試通過。->

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板： 报价| 聂拉木县| 嘉祥县| 兴文县| 班玛县| 顺昌县| 柘城县| 隆安县| 治县。| 甘洛县| 河源市| 广安市| 西丰县| 丹巴县| 林甸县| 安仁县| 汝南县| 淮安市| 会同县| 沿河| 太康县| 正安县| 达日县| 牟定县| 繁峙县| 柘城县| 淮阳县| 伊金霍洛旗| 兰坪| 凤山县| 阿尔山市| 百色市| 平乡县| 信阳市| 枣强县| 军事| 玉山县| 河池市| 德庆县| 德庆县| 和龙市|