vb.net如何静音 vbnet single

vb 中如何去掉massagebox的声音

VB中MessageBox和MsgBox 默认是不加声音vb.net如何静音的vb.net如何静音，只有你设置了，才会发出声音。

如

'无声音

MessageBox.Show("Hello World", "Windows")

'有声音

MessageBox.Show("Hello World", "Windows", MessageBoxButtons.OK, MessageBoxIcon.Warning)

相关问答

Q1: 如何在编的VB.NET程序使用时关闭电脑

有两种方法，第一种是调用shutdown.exe

shell("shutdown.exe路径

-s

-t

0")

'-t是延迟时间，0表示立刻关机

另一种就是使用API了，好像是ExitWindow，你可以去搜索一下其用法。

Q2: vb.net设置音量

调用系统Api

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

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

在winmm.dll中

第一个参数可以为0vb.net如何静音，表示首选设备

第二个参数为音量:0xFFFF为最大vb.net如何静音，0x0000为最小vb.net如何静音，其中高位（前两位）表示右声道音量vb.net如何静音，低位（后两位）表示左 声道音量 。

2、弹出系统音量调节框

ProcessStartInfo Info=new ProcessStartInfo();

Info.FileName = "Sndvol32";

Process.Start(Info);

Q3: vb获取歌曲时间

四、 AxWindowsMediaPlayer

该控件不是系统标准控件，需安装Windows Media Player, 安装Windows Media Player时选择默认安装，在调出的“选择工具箱项”对话框的“COM组件”选项卡中有一个名为Windows Media Player的项目，将其添加到工具栏便可使用。

AxWindowsMediaPlayer1.URL = "c:\回家.mpg" '设置播放文件

AxWindowsMediaPlayer1.settings.volume =50 '设置音量为50

AxWindowsMediaPlayer1.Ctlcontrols.play() '播放

AxWindowsMediaPlayer1.Ctlcontrols. pause () '暂停

AxWindowsMediaPlayer1.fullScreen = True '全屏播放

AxWindowsMediaPlayer1.settings.balance = 100 '选择左声道

AxWindowsMediaPlayer1.settings.balance = 0 '选择立体道

AxWindowsMediaPlayer1.settings.balance = -100 '选择右声道

AxWindowsMediaPlayer1.fullScreen = True '全屏播放

Label1.Text = AxWindowsMediaPlayer1.currentMedia.durationString '媒体总长度，格式为05:56

Label1.Text = "文件总长度：" AxWindowsMediaPlayer1.currentMedia.duration() '单位为秒，格式为：241.1075663

Label1.Text = "当前播放时间：" AxWindowsMediaPlayer1.Ctlcontrols.currentPosition '单位为秒，格式为：10.3172578

AxWindowsMediaPlayer1.Ctlcontrols.currentPosition = AxWindowsMediaPlayer1.Ctlcontrols.currentPosition – 10'后退10秒

AxWindowsMediaPlayer1.settings.mute = True '设置为静音

AxWindowsMediaPlayer1.settings.volume = TrackBar1.Value '设置音量

Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick

'该过程用于循环播放

Dim a As Int16 = AxWindowsMediaPlayer1.currentMedia.duration() '单位为秒，格式为：241.1075663

Dim b As Int16 = AxWindowsMediaPlayer1.Ctlcontrols.currentPosition '单位为秒，格式为：10.3172578

If b = a Then

AxWindowsMediaPlayer1.Ctlcontrols.stop()

AxWindowsMediaPlayer1.Ctlcontrols.play()

End If

End Sub

以上代码在VB.NET，windows XP 中测试通过

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

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

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

调试麦克风vb.net如何静音：控制面板 - 高清晰音频配置 - 混频器 - 重放 - 小扳手 - 选择 - 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“。重新启动计算机。

Q5: 怎样才能用VB.NET的代码来关闭一个在运行的程序

软糖来回答罗：通过System.Diagnostics命名空间下的Process类来关闭程序的进程

        Dim 进程集合 = Process.GetProcessesByName("进程名称")

        For Each 进程 In 进程集合

            进程.Kill()

            '进程.Close() '或者使用关闭

        Next

也可以先获取所有进程，再来判断这些进程的名称ProcessName

 Dim 获取本地所有进程 = Process.GetProcesses()

        For Each 进程 In 获取本地所有进程

            If 进程.ProcessName = "explorer.exe" Then 进程.Kill()

        Next

关于vb.net如何静音和vbnet single的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。