chrisfang的Excel大全

【我爱弹钢琴】之国庆特别版

2019-09-28
作者: chrisfang | 分类: ExcelVBA程序 | 阅读: 827 次浏览 | Tags:
声明: 本站文章均属原创,转载时请标明出处

适逢共和国70周年大庆之际,在我以前的一款旧作《我爱弹钢琴》基础上进行了一些加工,完成了这个国庆特别版。

这款用Excel VBA编写的趣味小程序是十年前(2009年)的旧作,曾在ExcelHome论坛的趣味作品大赛中获得过一等奖。这款“钢琴”可以用按键或鼠标弹奏,弹奏结束可以听回放,还可以观看收听内置曲目的自动弹奏,玩法很多。

在本次国庆特别版当中,除了添加国庆背景之外,还增加了64位系统的兼容性,新增了内置曲目《我和我的祖国》,希望大家喜欢。

主要功能

【弹奏】
打开工作簿,选择“启用宏”启动程序。下方状态栏显示“就绪”后,即可使用鼠标或电脑键盘开始弹奏钢琴(记得打开音箱)。

使用鼠标可以直接在程序的界面上点击钢琴键盘弹奏,如果使用电脑按键进行弹奏,则可以勾选上方功能区当中的“按键提示”复选框,此时钢琴键盘上会显示对应的电脑按键,对照按键即可弹奏。

【按键提示】
功能区中的“按键提示”可以根据需要进行勾选,会显示或隐藏钢琴键盘所对应的电脑按键。

【音量、音调调节】
功能区当中的第一个按钮为“音量调节”按钮,点击后出现音量滑动条,可以调节系统主音量和MIDI设备音量大小(同时调节)。

功能区的第二个按钮为“音调选择”按钮,点击后可以选择不同的音调基准。

【收藏曲目】
功能区当中的第三个按钮为“收藏曲目”按钮,程序中已经内置了一些钢琴弹奏的曲目,点击此按钮选择其中的内置曲目后,可以再通过点击右侧的三角形“播放”按钮播放内置曲目,程序会在播放钢琴声音的同时显示键盘按键位置。

在播放内置曲目过程中,不再接受用户按键或鼠标点击琴键的动作。播放过程中可以点击功能区中的正方形“停止”按钮终止播放,播放结束后可以再次点击“播放”按钮进行播放,或是选择其他内置曲目进行播放,也可以进行自由弹奏。

收藏曲目中的《我和我的祖国》,是特别为本次70周年国庆新增的。在播放这首内置曲目时,会在功能区右侧区域同步显示其对应的歌词字幕。

【录音和回放】
功能区右侧的“录音功能”复选框在勾选以后,程序进入录音模式工作状态,不再允许内置曲目的选择。用户准备好进行弹奏录音后,可以点击功能区中红色圆圈图标的“录音”按钮开始录音,此时用户的按键动作和按键之间的时间停顿都将被实时记录下来,直到点击功能区中的正方形“停止”按钮停止录音。

在停止录音后,可以点击“播放”按钮收听录音回放,同时查看记录下来的按键操作。在播放过程中,不再接受用户按键或鼠标点击琴键的动作。播放过程中可以点击功能区中的正方形“停止”按钮终止录音的播放,播放结束后可以再次点击“播放”按钮进行回放,也可以再次点击“录音”按钮开始新的录音操作,也可以进行自由弹奏。进行新的录音时,会覆盖原有用户录制的曲目(不影响程序内置曲目)。

【其他注意事项】
要退出录音模式,可以取消“录音功能”复选框的勾选,恢复到正常模式,此时播放内置曲目功能同时恢复有效。注意,在录音按钮按下后,系统长时间处于按键记录状态,如果不再需要记录,记得点击“停止”按钮终止录音,避免长时间消耗系统资源。

本地下载:《我爱弹钢琴》国庆七十周年特别版 (50)
百度云:https://pan.baidu.com/s/10UNeW3BrWnVRcHFQmZuI1A

演示视频:https://weibo.com/tv/v/I9iEz9jDe?fid=1034:4422162233361832

发表评论

电子邮件地址不会被公开。 必填项已用*标注

您可以使用这些HTML标签和属性: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <strike> <strong>