vb.net2008 Direct编程（三）音乐播放器——第一部分

深碍√TFBOYSˉ_ 2022-06-10 13:44 175阅读 0赞

vb2008 Direct编程之音乐播放器

又是新的一篇教程，来看看题目，很吸引人是吧，那就让我们来show一场，编写一个自己的音乐播放器。先来看一下我们的音乐播放器的功能——调节声道，调节音量，播放及停止，功能“不少”——算的上播放器了。废话不多说，开编喽……

来，在界面上放上

两个button：button1（text =“播放”，enabled = true）button2（text = “停止”， enabled = false），

两个trackbar：trackbar1（minimum = -5000，maximum = 0）trackbar2（minimum = -10000，maximum = 10000），

一个textbox：textbox1

![f7404ab470eeb6e736d3cacf.jpg][]

界面准备好了吗？我们要开始写源码了：

别忘了引用directsound和imports，这里我不多说了，相信大多数人都会了吧，不会的再看上一节，剩下的，继续喽~

首先声明两个全局变量，这两个变量我也不多废话了，不会的请~看~上一节吧。

注意这里，第二个不直接实例化，否则会出错。

Dim devAs New Device

Dim sbAs SecondaryBuffer

声明完了吧，我们要写事件喽~在写播放事件之前，我们首先要在窗体的load事件中将dev设为置为窗体服务：

dev.SetCooperativeLevel(Me, CooperativeLevel.Normal)

还要修改两个值，这两个值是为后面的调节声道和音量作准备的，只有

Enb\_DS.ControlVolume =  True

的时候，调节声音才有效，否则调节音量会出错的。

同理，只有

Enb\_DS.ControlPan =  True

的时候，调节声道才有效，否则也会出错。总的load事件的代码：

转自《 [http://hi.baidu.com/752664788/blog/item/bf80eaecf85ea54678f055a4.html][http_hi.baidu.com_752664788_blog_item_bf80eaecf85ea54678f055a4.html] 》

[f7404ab470eeb6e736d3cacf.jpg]: /images/20220610/cb2a3c2f5da4406289cc7bfc0c598246.png
[http_hi.baidu.com_752664788_blog_item_bf80eaecf85ea54678f055a4.html]: http://hi.baidu.com/752664788/blog/item/bf80eaecf85ea54678f055a4.html

发表评论取消回复

表情：

评论列表（有 0 条评论，175人围观）

还没有评论，来说两句吧...

相关阅读

相关 hexo-matery主题美化(三)-音乐播放器

hexo-matery主题美化(三)-音乐播放器 > 作者：江南骚年配置音乐播放器要支持音乐播放，在主题的 `_config.yml` 配置文件中激活musi

我会带着你远行/ 2022年11月26日 01:55/ 0 赞/ 280 阅读

相关 Android音乐播放器

Android音乐播放器目录 Android音乐播放器目录搭建整体框架功能实

亦凉/ 2022年08月17日 15:12/ 0 赞/ 505 阅读

相关 vb.net2008 Direct编程（三）音乐播放器——第二部分

Private Sub Form1\_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Hand

喜欢ヅ旅行/ 2022年06月10日 13:44/ 0 赞/ 238 阅读

相关 vb.net2008 Direct编程（三）音乐播放器——第一部分

vb2008 Direct编程之音乐播放器又是新的一篇教程，来看看题目，很吸引人是吧，那就让我们来show一场，编写一个自己的音乐播放器。先来看一下我们的音乐播放器的功能—

深碍√TFBOYSˉ_/ 2022年06月10日 13:44/ 0 赞/ 176 阅读

相关 Vb.net2008 Direct编程（二）

Direcrsound教程学习嘛，从最简单的开始，本节课我将告诉大家如何使用direct播放音乐。首先我介绍一下directsound：它是 directx 中的一

た入场券/ 2022年06月10日 13:44/ 0 赞/ 190 阅读

相关 Vb.net2008 Direct编程（一）

Vb.net2008 Direct编程（一）这几天用vs2008编写direct游戏，突然发现关于vs2008的direct的教程几乎没有。所以我决定——让我这个

港控/mmm°/ 2022年06月10日 13:44/ 0 赞/ 187 阅读

相关开源音乐播放器!

<table style="border-collapse:collapse; border-spacing:0px; max-width:100

小鱼儿/ 2022年06月09日 08:28/ 0 赞/ 484 阅读

相关模拟音乐播放器

简单模拟一个音乐播放器,音乐正常的播放功能兼容到IE9，IE8就挂掉了，谷歌，火狐，欧朋，Edge，360测试正常，IE下input样式待优化，希望大家提点建议。预览地址：

绝地灬酷狼/ 2022年05月26日 01:26/ 0 赞/ 605 阅读

相关 C#简单音乐播放器（三）

简单音乐播放器（三） [【上一篇】简单音乐播放器（二）][Link 1] 一、前言时隔一年，终于回来填坑了。前段时间把这个以前写的东西拿出来大改了UI，然

谁借莪１个温暖的怀抱￠/ 2022年05月18日 06:06/ 0 赞/ 412 阅读

相关音乐播放器

项目效果 ![在这里插入图片描述][70] 音乐播放器的简述 “背景图片” 图片首先运用canvas的方式将图片通过drawimage的方法画到canv

浅浅的花香味﹌/ 2022年05月11日 05:16/ 0 赞/ 605 阅读