易语言让主机蜂鸣器鸣响

易语言咋样让主机蜂鸣器鸣响？就像在cmd中输入^G^G^G发出的鸣响一样谢谢

设置窗口透明度（对象.取窗口句柄（），0）
参数一是窗口句柄，比如_启动窗口.取窗口句柄(),这就表示我们所要透明的窗口是启动窗口,参数二是透明度,数值为0-255,0表示透明,255表示不透明.
.版本 2
.支持库 eAPI

.子程序 __启动窗口_创建完毕

设置窗口透明度 (_启动窗口.取窗口句柄 (), 50)

以上是易语言中带的命令,同样的,我们也可以使用API:
.版本 2

.DLL命令 SetLayeredWindowAttributes, 整数型, , "SetLayeredWindowAttributes"【设置窗口透明度】
.参数 hwnd, 整数型 【窗口句柄】
.参数 crkey, 整数型 【掩码的颜色，可以用RGB(r,g,b)来指定】
.参数 alpha, 字节型 【不透明度，取值范围是0-255】
.参数 dwflags, 整数型 【透明方式】

另外还需要用到两个API:
.版本 2

.DLL命令 GetWindowLong, 整数型, , "GetWindowLongA"【该函数获得有关指定窗口的信息，函数也获得在额外窗口内存中指定偏移位地址的32位度整型值。 】
.参数 hwnd, 整数型 【窗口句柄】
.参数 nindex, 整数型 【内容比较多请自行查百度】
.版本 2

.DLL命令 SetWindowLong, 整数型, , "SetWindowLongA"【该函数改变指定窗口的属性．函数也将指定的一个32位值设置在窗口的额外存储空间的指定偏移位置】
.参数 hwnd, 整数型 【窗口句柄】
.参数 nindex, 整数型 【内容比较多请自行查百度】
.参数 dwnewlong, 整数型 【内容比较多请自行查百度】

同样是使启动窗口透明,代码如下:
.版本 2

.子程序 __启动窗口_创建完毕
.局部变量 AA, 整数型

AA ＝ GetWindowLong (_启动窗口.取窗口句柄 (), -20)
AA ＝ 位或 (AA, 524288)
SetWindowLong (_启动窗口.取窗口句柄 (), -20, AA)
SetLayeredWindowAttributes (_启动窗口.取窗口句柄 (), 0, 50, 2) 你要的是不是这个。

时间我设置的5000 就是响5秒

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息！