189 8069 5689

vb.net如何静音 vbnet break

如何用命令行或批处理实现“静音”

没有这种命令的,不过有现成的API

创新互联"三网合一"的企业建站思路。企业可建设拥有电脑版、微信版、手机版的企业网站。实现跨屏营销,产品发布一步更新,电脑网络+移动网络一网打尽,满足企业的营销需求!创新互联具备承接各种类型的网站制作、做网站项目的能力。经过十余年的努力的开拓,为不同行业的企事业单位提供了优质的服务,并获得了客户的一致好评。

有兴趣的话可以自己写一个,最好弄成Console Application,然后再给它新建一个快捷方式,最后给快捷方式加快捷键。

这个是VB的示例

这里也有些代码可以参考下

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.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 中如何去掉massagebox的声音

VB中MessageBox和MsgBox 默认是不加声音的,只有你设置了,才会发出声音。

'无声音

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

'有声音

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


分享文章:vb.net如何静音 vbnet break
转载源于:http://cdxtjz.cn/article/doggogs.html

其他资讯