快上网专注成都网站设计 成都网站制作 成都网站建设
成都网站建设公司服务热线:028-86922220

网站建设知识

十年网站开发经验 + 多家企业客户 + 靠谱的建站团队

量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决

vb.net音量获取,vb播放声音

vb.net中如何播放声音,是要什么控件嘛?

My.Computer.Audio.Play("SoundFile.wav")

在嘉兴等地区,都构建了全面的区域性战略布局,加强发展的系统性、市场前瞻性、产品创新能力,以专注、极致的服务理念,为客户提供成都网站设计、做网站 网站设计制作按需策划设计,公司网站建设,企业网站建设,品牌网站设计,成都全网营销,外贸网站制作,嘉兴网站建设费用合理。

SoundFile.wav是你要播放的声音文件的路径

vb.net设置音量

调用系统Api

[DllImport("winmm.dll")] //引用winmm.dll

public static extern long waveOutSetVolume(long deviceID, long Volume);

在winmm.dll中

第一个参数可以为0,表示首选设备

第二个参数为音量:0xFFFF为最大,0x0000为最小,其中高位(前两位)表示右声道音量,低位(后两位)表示左 声道音量 。

2、弹出系统音量调节框

ProcessStartInfo Info=new ProcessStartInfo();

Info.FileName = "Sndvol32";

Process.Start(Info);

vb.net的,按键连续触发事件,比如,按着键不放,音量增大。

1.定义变量记录键是否被按下,按下的累计时间

Dim 按下A键  As Boolean

Dim 按下A键时间 As Integer

2.添加一个TextBox1用于接收键盘事件,或者直接用窗体的键盘事件(确保KeyPreview为True)

在KeyDown事件中添加如下代码:

If e.Keycode = keys.A Then 按下A键 = True

在KeyUp事件中添加如下代码:

If e.Keycode = keys.A Then 按下A键 = False

3.添加一个Timer1控件,调整Timer1的Interval来决定按键频率,记得要把Timer1.Enable开启

在Tick事件中添加如下代码:

If 按下A键 = True

按下A键时间+=1

Call 音量设置(按下A键时间 * 10)

End If

PS: 按下的秒数 = 按下A键时间*Timer1.Interval / 1000

vb.net控制系统音量

Imports System.Runtime.InteropServices

Public Class Form1

Private mute As Integer = H80000

Private up As Integer = HA0000

Private down As Integer = H90000

Private WM_APPCOMMAND As Integer = H319

DllImport("user32.dll") _

Public Shared Function SendMessageW(hWnd As IntPtr, Msg As Integer, wParam As IntPtr, lParam As IntPtr) As IntPtr

End Function

'加大

Private Sub btnUp_Click(sender As System.Object, e As System.EventArgs) Handles btnUp.Click

SendMessageW(Me.Handle, WM_APPCOMMAND, Me.Handle, New IntPtr(up))

End Sub

'减小

Private Sub btnZero_Click(sender As System.Object, e As System.EventArgs) Handles btnZero.Click

SendMessageW(Me.Handle, WM_APPCOMMAND, Me.Handle, New IntPtr(mute))

End Sub

'静音

Private Sub btnDown_Click(sender As System.Object, e As System.EventArgs) Handles btnDown.Click

SendMessageW(Me.Handle, WM_APPCOMMAND, Me.Handle, New IntPtr(down))

End Sub

End Class

VB怎么获取系统音量?

API函数中的waveOutGetVolume函数是得到系统当前音量值的函数,函数声明:

Private Declare Function waveOutGetVolume Lib "Winmm.dll "(ByVal wDeviceID As ntegerI,dw volume As Long)As Integer

多媒体 音频 声音 音量 大小 如何得到系统实时音量大小,用VB.net易的win7声音控制软件,

驱动程序,设置,文件,注册表四个方面,震动,如看它是否可以恢复全面检查,案件的接口是坏的,这是为配件

首先,请检查声音卡驱动程序,右键单击“我的电脑” - 属性 - 硬件 - 设备管理器 - 声音,视频和游戏控制器 - 右击 - ReaItek - 更新或扫描,卸载并重新安装。 (如果你下载的驱动程序生命没有驱动程序包 - 驱动更新 - 声音,视频 - 开始更新 - 自动找到的官方驱动程序 - 重新启动计算机。)

调试麦克风:控制面板 - 高清晰音频配置 - 混频器 - 重放 - 小扳手 - 选择 - OK - - 后粉红色 - X'静音,推高了麦克风插孔前面板 - 选择 - OK,然后打X麦克风静音,然后在右边拉点音频I/O--小扳手 - 选择“禁用前面板插孔检测 - OK - 返回混频器 - 录制 - 小扳手 - 点击麦克风的音量(版本不一致需打X-静音立体声混音)

加强麦克风:右键单击右下角的小喇叭(小喇叭的音量上) - 调整音频属性 - 音量 - 设备音量 - 高级 - (主音??量全推到上) - 选项 - 属性 - 麦克风音量打勾 - 确定返回选项 - 高级控制 - 高级 - 麦克风加强了钩。

右下角的小喇叭显示:开始---设置---控制面板 - 声音和音频设备 - 音量 - (勾选)将音量图标放入任务栏上。

5。在网页中,网页声音的操作方法:打开网页 - 工具 - 选项 - 高级 - (勾选)播放的声音。

6。游戏耳机出声来:控制面板---高清晰音频配置 - 音频I/O--耳机 - 选举8CH喇叭。

7。前部和后部面板插孔调试:控制面板 - 高清晰音频配置 - 音频I/O--模拟 - 后面板插孔图标 - 单击 - 你插入的设备吗? (需插入的设备,如插耳机) - 当选耳机 - OK,所以

8。使用QQ聊天的语言时,MIC音量无法调整,请下载补丁。

9,如声卡驱动安装不上的解决方法:控制面板 - 管理工具 - 服务 - Windows音频 - 启动类型设置为“自动”重新启动它。

10。注册表的方法:

开始 - 运行 - 输入regedit打开注册表,然后单击“打开HKEY_LOCAL_MACHINE \ SOFTWARE \微软\的Windows \ CurrentVersion \ Run在右侧窗口中新建字符串”系统托盘“点右键(在运行于新的)键(在系统托盘中双击编辑)“C:\ WINDOWS \ SYSTEM32 \ Systray.exe”win2000系统,或“C:\ WINNT \ SYSTEM32 \ Systray.exe”

开始 - 运行 - 输入regedit打开注册表,然后单击“打开HKEY_LOCAL_MACHINE \ SOFTWARE \微软\ WINDOWSNT \ CURRENTVERSION \ Drivers32创建一个新的字符串值,命名为”wavemapper“值”msacm32。DRV“。重新启动计算机。


分享文章:vb.net音量获取,vb播放声音
文章源于:http://6mz.cn/article/dsiodhs.html

其他资讯