说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

Visual Basic 5.0多媒体创作技巧

HTML文档下载 WORD文档下载 PDF文档下载
Visual Basic 5.0多媒体创作技巧

Visual Basic 5.0因其可视化的编程方式越来越受到编程人员的青睐,我们可以使用Visual Basic 5.0编写拥有漂亮的界面、动听的音乐的多媒体软件。但在实际的编程过程中可能会遇到一些难以解决的问题,以下是笔者在多媒体创作中的几点经验,或许能丰富一下你的多媒体配件箱。

一、背景音乐

在使用Visual Basic 5.0编制应用程序时,我们可以利用OLE嵌套的方 法很容易的为一个应用程序加入背景音乐。

进入Visual Basic 5.0系统环境,建立一个新的表单。点击‘表单控制’上的‘OLE容器’,并将其拖至FORM中任意位置。在‘插入对象’窗口中选择‘媒体剪辑’,选中‘以图标显示’栏(必须选中此栏,否则无法将其隐藏起来),按‘确认’键退出。
在‘媒体播放机’窗口中,选择‘文件’、‘打开’,从文件列表中选择想要作为背景音乐的声音文件。由于音乐文件一般不是很长,所以要求循环播放,可以通过设置‘媒体播放机’重复播放来实现。然后选择‘编辑’菜单中的‘选项’,在选项窗口中选中‘重复播放’和去掉‘重放的控制条’前的选中标记,确认后退出。
回到Visual Basic 5.0系统环境,按下鼠标右键,在弹出菜单中点击‘属性’栏调出属性窗口。选择‘Ole1’对象,将它的‘Visible’属性设为.F.,‘Autosize’属性设为.F.。再按下鼠标右键,在弹出菜单中点击‘代码’栏进入过程书写窗口,编写‘Form1’对象的‘Load’过程:
Private Sub Form_Load()

OLE1.DoVerb (0)

End Sub

4、 按‘F5’键运行即可。

二、透明效果立体按钮

在制作多媒体软件时有时需要有透明效果的立体按钮,我们可以利用标签(LABEL)与形状(SHAPE)的组合来完成这一设计。

进入Visual Basic 5.0系统环境,建立一个新的表单(FORM1),并设置FORM1的Picture属性为一个WINDOWS位图文件(.BMP)。
鼠标点击“表单控制栏”中的“形状”,并在FORM1上拉出一个矩形方框(SHAPE1)。以同样方法创建SHAPE2、SHAPE3和SHAPE4。在属性窗口中对这四个SHAPE的属性进行如下设置:
SHAPE1:

BorderColor = &HFFFFFF

BorderWidth = 3 Left = 2160

Top = 2040 Width = 1100

SHAPE2:

BorderColor = &H80000008

BorderWidth = 3 Left = 2160

Top = 2520 Width = 1100

SHAPE3:

BorderColor = &HFFFFFF

BorderWidth = 3 Left = 2160

Top = 2040 Height = 500

SHAPE4:

BorderColor = &H80000008

BorderWidth = 3 Left = 3240

Top = 2040 Height = 500

鼠标点击“表单控制栏”中的“标签”,并在FORM1上拉出一个矩形方框(LABEL1),调整其大小以刚好嵌入四个SHAPE中。设置它的属性Caption为定制的按钮的标题,Alignment为2,Backstyle为0。
双击LABEL1,编写LABEL1的MouseDown过程和MouseUp过程如下:
Private Sub Label1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

Shape1.BorderColor = &H80000008

Shape3.BorderColor = &H80000008

Shape2.BorderColor = &HFFFFFF

Shape4.BorderColor = &HFFFFFF

Label1.Top = Label1.Top + 10

End Sub

Private Sub Label1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

Shape1.BorderColor = &HFFFFFF

Shape3.BorderColor = &HFFFFFF

Shape2.BorderColor = &H80000008

Shape4.BorderColor = &H80000008

Label1.Top = Label1.Top - 10

End Sub

按‘F5’键运行即可。
三、移动字幕

在电视上我们时常会看到屏幕下方会有一行提示文字或广告信息由右至左移动,这样既起了提示作用又不会破坏整体屏幕。在Visual Basic 5.0中我们同样可以完成这种设计。

进入Visual Basic 5.0系统环境,建立一个新的表单(FORM1),并设置FORM1的Backcolor属性为一个RGB(192,192,192)。
鼠标点击“表单控制栏”中的“标签”,并在FORM1上拉出一个矩形方框(LABEL1)。设置它的属性Caption为“活动字幕演示”,Autosize为 .T.,Backstyle为0,Forecolor为RGB(128,128,128),Fontname为“隶书体”,Fontbold为 .T.,Fontsize为36。
鼠标点击LABEL1,按CTRL + C(拷贝)键,再按CTRL + V(粘贴)键,在FORM1上创建另一个标题与LABEL1相同的标签(LABEL2),设置它的Forecolor属性为RGB(255,255,0)。调整LABEL2的位置,使其刚好比LABEL1高一些,使LABEL1
Elevator.js:模拟电梯运行的“返回顶部”JS插件 Java,传奇的一生! 约吗?Java二十周年特别策划——寻找Java大牛! 走近英特尔软件技术王牌之师:系统技术和优化部门 新兴技术袭来,Web开发如何抉择? 新创社交平台Tsu 5周註冊用户破百万秘訣 Google Play:助力中国开发者的海外梦想 JPHP——一款基于JVM的新PHP编译器 舌尖上的CTO——小杨生煎的持续交付 《近匠》滴答清单,跨平台云同步的任务管理工具 DJI与优酷土豆战略合作:提升UGC价值,先内容再营销 Android性能优化典范(二) 从三大运营商联手 看电视游戏背后的现状 【工具推荐】Vert.x——非阻塞、高并发的编程开发框架 Google搜索在确定结果排名时会将网站的移动设备适用性作为考量因素 W3C首次发布SVG标记、SVG轮廓标准工作草案 第七届中国云计算大会 | 首批主会演讲嘉宾和议题公布(表) 安沃传媒创始人王旭东:开发者从移动广告获利的黄金时代已经来临 【舌尖上的CTO】砂锅馄饨的交付件 微软新Visual Studio Code开发工具支持Mac和Linux 科技新创公司想做大?从CNN记者跳槽Snapchat谈起 Java二十年特别奉献:晒博文、赢大奖! 《近匠》华为创新总监蔡绪鹏:智能手表的三大感知与未解难题 从Samurai-Native框架开发谈React Native Qualcomm公司李申:Vuforia打破AR设备界线 物与物的互通:解析Thread、AllJoyn、OIC、Bonjour的特点 《天龙八部3D》中Unity使用介绍 微软推出ManifoldJS,Web App自动转成各平台本地App 专访庄晓丹:Java程序员眼中的Clojure 全面解析ECMAScript 6模块系统 七牛技术总监陈超:记Spark Summit China 2015 c、odbc、嵌入式sql的关系? 简单的重载问题! 用<input type="fiel" name="test">时,怎样判断输进去的文件是硬盘上实际存在的? 请问哪里有eclipse 下载? FINDING SOMEBODY! 显示器不亮,请帮忙,解决给100分 写在3.15黎明的前夕 **冗余醒目**《如何在输入的时候减小冗余》**冗余醒目** 各位,CSDN的论坛都是用些什么工具开发的?? 请问个位大虾,我的程序为什么不能执行(TC++3.0) 在VC中怎么调用IE来显示一个页面? 怎样在新开的页面给已开的页面上的一个TextBox插入新的字符串 [转贴]网络版权问题 **冗余醒目**《如何在输入的时候减小冗余》**冗余醒目** 用purify测试过的release版本怎么在别人的计算机上运行有问题? 如果用asp连接mysql,请问连接字符串是什么? 我要做一个在小型的对等网上运行的数据库软件,用什么方法好点? 如果用asp连接mysql,请问连接字符串是什么? 请高手帮我解答一个关于在ASP中调用存储过程的问题? 怎么输入繁体字? 足彩-03010期:1033031110310 请教高手在DELPHI里怎样实现把一个文件存储到ORACLE上, 然后又如何调出来使用?? 我快疯了救救我!!!!!!!!!! 我为什么要做个刁民? 屏幕上显示绘多条曲线,要对每条曲线单独进行操作如何实现? 怎样避开程序对softice和trw的检查 想学ACCP不知道社会的认可度? 怎样使用windowsxp/2000的修复程序? C:\winnt\下有一个hh.exe文件,有什么作用? 这首诗我觉得用在程序员身上也很合适 在WebSnap中如何实现gride的隔行显示不同颜色,就象我们现在看到的一样?? 关于《C++ Primer plus(中文版)第四版〉》,大家发表一下看法好吗。 中文文件 颜色代码转换的问题大家帮忙呀.. 程序编译问题 问一个可笑的问题。希望能得到回复 那位用过TfcShapeBtn控件? 急!从NT4到W2000后,为何ASP出错? combustion? 100分有人答了吧 WHERE TO DOWNLOAD??? c#/web,有个约一万行的参数表需用于校验页面录入的数据 帮帮忙啊,急啊 谁有dhtml的中文帮助? 如何使窗口全屏化,即不覆盖Toplevel窗口(winamp),又能覆盖任务栏? 请教各位高手,怎样将网卡的MAC地址与IP地址绑定起来,让用户不能改变? 我自己构造了一个HTTP请求头想要下载swf,但是服务器不接受请求。各位大哥帮忙看一下 简单问题 关于dll的基本问题 求求各位了,急啊(原程序问题) 这段程序问题出在哪儿? 小亮和小东一起把蓝色块状胆矾放在研钵中研磨 发现变成了蓝色粉末 小亮问:“胆矾研碎事发生了什么变化他们将一小块胆矾合少量粉末分别放入两只试管中各加2ml水后振荡结果均观察到 这篇文章该怎么解释只管往前走的牛它只管往前走,每个脚步都是深重的,深重地扎在泥土里,每颗汗珠都是结实的,结实地撒落在田野上它只管往前走,前面只有黑褐色的泥土.肩负重扼,在深深的 ]在三角形ABC中,AB=AC=2,BC边上有200个不同德点,P1,P2,…,P200.记Mi=AP的平...]在三角形ABC中,AB=AC=2,BC边上有200个不同德点,P1,P2,…,P200.记Mi=AP的平方i+BPi×PiC(i=1,2,3,…,200)试求M1+M2+…+M200的值. 带鱼的卵在深海里会爆吗 求原生质体培养基 CM-Ⅰ、原生质体分离、纯化所用的MR、MPS、CPW配制方法CM-Ⅰ是原生质体培养基,MR、MPS、CPW是原生质体分离纯化(双界面悬浮法)时用的,求这些溶液(CM-Ⅰ、MR、MPS、CPW)的 如图,△ABC中,AB=AC=2,BC边上有10个不同的点P1...如图,△ABC中,AB=AC=2,BC边上有10个不同的点P1,P2,…P10,记Mi=APi2+PiB•PiC(i=1,2,…,10),那么,M1+M2+…+M10=_____,m1=_____ 蜗牛前面放堆糖水,它会爬向糖水,说明蜗牛具有?具有什么性? 块状的蓝矾和粉末状的蓝矾分别溶解后,成为蓝色______的溶液 植物体细胞杂交的第一步是去除细胞壁,分离出有活力的原生质体,目前比步骤最常用的是酶解法,也就是在温植物体细胞杂交的第一步是去除细胞壁,分离出有活力的原生质体,目前比步骤最 兴隆的反义词 不蓝我粉你 植物组培中要用酶解法去除细胞壁吗 青蛙为什么能够跳的那么高? 滋养的反义词快 钢铁和石头都属于哪种物理属性 《守株待兔》古文 “地铁”有哪几种译法? 线段ab=40mm,在直线ab上画线段bc=16mm,d是ac的中点,求cd的长度 MT是什么意思? 兴隆的近义词和反义词 物理钢铁重量怎么求物理钢铁公式 糖水为什么能透过滤纸 什么银白色固体能变红色 战斗机 音障那个F14突破音障的时候为什么会解体?现在战斗机的速度不都是1点几倍的音速么,为什么没有事?还有战斗机突破音障那一瞬间是不是周围都有气流?战斗机突破音障的时候是不是什 应急灯,可以用同那一项的 电源嘛 求高手分析下这篇雅思大作文剑9T1的作文,可以得几分?有什么不好的地方?怎么改进? 穿越音障瞬间.大家都知道当战斗机跨越声速的一瞬间会产生音爆这种震耳欲聋的巨响,但战斗机周围的那一团锥型的雾是怎么会事,是只要物体运动速度穿越音障都会看到么?(排除大气层外) 数学问题:作业的应用题某文具工厂要加工图画工具2500套,加工1000套后,采用了新技术,使每天的工作效率是原来的1.5倍,结果提前5天完成任务,求该文具厂采用新技术前平均每天加工多少套图 英语翻译如题 所谓音障发生的原理rt所谓战斗机音障发生的原理 应急灯电源如何让节能灯发光普通手提的应急灯未经过逆变器却直接接在220V的节能灯(白帜灯)上就能正常发光是怎么回事?如何可以做到? 在生活中我们应该具备那些常识. 已知:如图,AB//DC,AB=DC,O是DB上一点,过点O的直线分别交DA和BC的延长线于点E、F.求证:∠E=∠F 应急灯需要用两路双电源吗? 怎么样才能适应社会,并且也能在社会上生存的方法是什么? 已知四棱锥P-ABCD的底面为直角梯形,AB平行DC,角DAB=90°,PA垂直底面ABCD且PA=AD=DC=1/2AB=1M是PB中点(1)求点B到平面MAC的距离(2)求二面角M-AC-B大小上图错了 消防应急灯电源接总开关的下端吗消防应急灯电源接在照明总开关的下端还是上端.消防应急灯电源可以在总开关上端加个熔断器供给消防应急灯电源. 忘记的反义词是什么 CuCO3和Cu(OH)2的混合物22.2g,可恰好完全溶于100毫升,4摩尔每升的盐酸溶液中加热分解等量的这种混合物可得CuO的质量多少克? 滋润的反义词 忘的反义词是什么 如图,在直角梯形ABCD中,AB//CD,DA⊥AB,CD=2,AB=3,AD=7,在AD上能否找到一点P,使三角形PAB和三角行P 滋润的反义词是什么? 生物上说的植物可以进行离体培养,但要有培养基,请问培养基该怎样配? 假文盲的作文怎么写. 注塑模.压铸模,冲压模模具的相同点和不同点 红曲霉的原生质体诱变成功后,通过什么培养基进行培养?RT 假文盲作文怎么写 塑胶模和冲压模什么区别? 我想把应急灯加个开关,就是断电之后可以控制灯的开关,我应改怎么弄. 已知静水速度、水速求路程 (快的话. 模具之间有什么不同啊.主要是注塑模冲压模和压铸模 消防应急灯拔掉电源后灯亮,求方法使灯熄灭.有没有开关直接关了它 我搭的鸡舍共三层,上一层养鸽子,下面两层养鸡,这样可以吗? 价格走势:冲压模,铸造模,锻造模,拉丝模,成型模,压铸模,冲裁模,弯曲模我们企业的主要产品有:冲压模,铸造模,锻造模,拉丝模,成型模,压铸模,冲裁模,弯曲模谁知道这些产品的最新市场价格 端盖的冲压模具设计 冬天小户养鸡怎么给鸡舍加温 压铸模与塑胶模有什么不同 有没有做冲压模具设计的朋友 母爱可以拯救一切是谁写的? 手机通信遭窥视?默克尔向奥巴马要说法巴基斯坦总理:赶快停止无人机空袭!肯尼迪刺客婚戒将拍卖白宫网页万人请愿辱华节目被删除李肇星:国内一大企业家在欧洲浪费粮食美军史上首艘超级航母以1美分贱卖尸检报告排除阿拉法特钋中毒 不排除其沙特威胁将疏远美国 分析称美地缘政治印度德里频发未成年人性侵案 作案者为星巴克CEO辩解在中国高定价 称报道伊朗暂停提炼20%纯度铀浓缩 距武器星巴克CEO:对中国媒体抱怨咖啡售价世界最高大的狗在美国去世 存活年龄为土耳其选择中国导弹,有人欢喜有人忧阿拉法特死因排除钋中毒 不排除其他毒李肇星:国内某大企业家在欧洲浪费粮食租金高,房源少,常搬家 租房住咋就这四部门:国家工作人员强奸猥亵未成年人北京大气污染听证会:\"停车3分钟须长沙贫困村举债千万建楼 8名工作人员嘉兴老师婚外恋5年给女学生打款近6万普京要求俄军保持警惕武汉一处路段爆炸 气流掀翻数辆轿车凌汛:朝内大街166号1977-19北京农商银行储蓄存款突破两千亿元许倬云笔下的家事、国事、天下事北京拟建行业准入“负面清单”中国电影的欧洲情节与好莱坞想象检方抗诉:砍杀同窗应判死刑辽宁拒绝退场抗议漏判投身怪异世界民资敢不敢接中石化的“橄榄枝”特许经营后停车费不会变能否成立同性恋组织与道德无关今年“畅通郑州”要提速回应8·16翻盘地铁7号线新车就位DISCOVERY EXPEDITI庆丰街航母新城即将开业国务院开始给权力列“清单”鸡足山闭门谢客究竟为何珠海闹市3车追逐枪战
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘