亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb

首頁 > 學院 > 開發設計 > 正文

VisualBasic5.0多媒體創作技巧

2019-11-18 17:37:23
字體:
來源:轉載
供稿:網友
VisualBasic5.0因其可視化的編程方式越來越受到編程人員的青睞,我們可以使用VisualBasic5.0編寫擁有漂亮的界面、動聽的音樂的多媒體軟件。但在實際的編程過程中可能會遇到一些難以解決的問題,以下是筆者在多媒體創作中的幾點經驗,或許能豐富一下你的多媒體配件箱。

一、背景音樂

在使用VisualBasic5.0編制應用程序時,我們可以利用OLE嵌套的方法很容易的為一個應用程序加入背景音樂。

進入VisualBasic5.0系統環境,建立一個新的表單。點擊‘表單控制'上的‘OLE容器',并將其拖至FORM中任意位置。在‘插入對象'窗口中選擇‘媒體剪輯',選中‘以圖標顯示'欄(必須選中此欄,否則無法將其隱藏起來),按‘確認'鍵退出。
在‘媒體播放機'窗口中,選擇‘文件'、‘打開',從文件列表中選擇想要作為背景音樂的聲音文件。由于音樂文件一般不是很長,所以要求循環播放,可以通過設置‘媒體播放機'重復播放來實現。然后選擇‘編輯'菜單中的‘選項',在選項窗口中選中‘重復播放'和去掉‘重放的控制條'前的選中標記,確認后退出。
回到VisualBasic5.0系統環境,按下鼠標右鍵,在彈出菜單中點擊‘屬性'欄調出屬性窗口。選擇‘Ole1'對象,將它的‘Visible'屬性設為.F.,‘Autosize'屬性設為.F.。再按下鼠標右鍵,在彈出菜單中點擊‘代碼'欄進入過程書寫窗口,編寫‘Form1'對象的‘Load'過程:

二、透明效果立體按鈕

在制作多媒體軟件時有時需要有透明效果的立體按鈕,我們可以利用標簽(LABEL)與形狀(SHAPE)的組合來完成這一設計。

進入VisualBasic5.0系統環境,建立一個新的表單(FORM1),并設置FORM1的Picture屬性為一個WINDOWS位圖文件(.BMP)。
鼠標點擊“表單控制欄”中的“形狀”,并在FORM1上拉出一個矩形方框(SHAPE1)。以同樣方法創建SHAPE2、SHAPE3和SHAPE4。在屬性窗口中對這四個SHAPE的屬性進行如下設置:
SHAPE1:

BorderColor=&HFFFFFF

BorderWidth=3Left=2160

Top=2040Width=1100

SHAPE2:

BorderColor=&H80000008

BorderWidth=3Left=2160

Top=2520Width=1100

SHAPE3:

BorderColor=&HFFFFFF

BorderWidth=3Left=2160

Top=2040Height=500

SHAPE4:

BorderColor=&H80000008

BorderWidth=3Left=3240

Top=2040Height=500

鼠標點擊“表單控制欄”中的“標簽”,并在FORM1上拉出一個矩形方框(LABEL1),調整其大小以剛好嵌入四個SHAPE中。設置它的屬性Caption為定制的按鈕的標題,Alignment為2,Backstyle為0。
雙擊LABEL1,編寫LABEL1的MouseDown過程和MouseUp過程如下:
PrivateSubLabel1_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)

Shape1.BorderColor=&H80000008

Shape3.BorderColor=&H80000008

Shape2.BorderColor=&HFFFFFF

Shape4.BorderColor=&HFFFFFF

Label1.Top=Label1.Top 10

EndSub

PrivateSubLabel1_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)

Shape1.BorderColor=&HFFFFFF

Shape3.BorderColor=&HFFFFFF

Shape2.BorderColor=&H80000008

Shape4.BorderColor=&H80000008

Label1.Top=Label1.Top-10

EndSub

按‘F5'鍵運行即可。
三、移動字幕

在電視上我們時常會看到屏幕下方會有一行提示文字或廣告信息由右至左移動,這樣既起了提示作用又不會破壞整體屏幕。在VisualBasic5.0中我們同樣可以完成這種設計。

進入VisualBasic5.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看起來象LABEL2的陰影。
鼠標點擊“表單控制欄”中的“計時器”,再在FORM1上點擊一下,即可在FORM1上創建一個計時器(TIMER1)。設置它的屬性Interval為200。
雙擊FORM1,編寫FORM1的Load過程如下:
PrivateSubForm_Load()

Label1.Left=Width 50

Label2.Left=Width

EndSub

6、雙擊TIMER1,編寫TIMER1的Timer過程如下:

PrivateSubTimer1_Timer()

IfLabel1.Left<0-Label1.WidthThen

Label1.Left=Width 50

Label2.Left=Width

EndIf

Label1.Left=Label1.Left-500

Label2.Left=Label2.Left-500

EndSub

7、按‘F5'鍵運行即可見到字幕由屏幕右方出現,移至屏幕最左方消失。

四、文字的淡入淡出

很多
游戲的開始時的解說字幕和爆機后的創作人員表都使用了字符的淡入淡出方式,在VisualBasic5.0中同樣可以制作有淡入淡出效果的文字。

進入Visual Basic5.0系統環境,建立一個新的表單(FORM1)。
鼠標點擊“表單控制欄”中的“標簽”,并在FORM1上拉出一個矩形方框(LABEL1)。設置它的屬性Caption為“文字的淡入淡出”,Autosize為.T.,Backstyle為0,文字顏色為RGB(0,128,128),字體為“隸書體”,Fontbold為.T.,字體大小為36。
鼠標點擊“表單控制欄”中的“計時器”,再在FORM1上點擊一下,即可在FORM1上創建一個計時器(TIMER1)。設置它的屬性Interval為100,Enabled屬性為.F.。
鼠標點擊“表單控制欄”中的“命令按鈕”,并在FORM1上拉出一個矩形方框(COMMAND1)。設置它的屬性Caption為“開始”。
雙擊COMMAND1,編寫COMMAND1的Click過程如下:
PrivateSubCommand1_Click()

IfTimer1.Enabled=FalseThen

Timer1.Enabled=True

EndIf

EndSub

雙擊FORM1,編寫FORM1的Activate過程如下:
BackColor=RGB(0,128,128)

I=0

7、雙擊TIMER1,編寫TIMER1的Timer過程如下:

PrivateSubTimer1_Timer()

I=I 10

IfI>=255*2Then

Timer1.Enabled=False

I=0

EndIf

IfI>=255Then

Label1.ForeColor=RGB(255*2-I,128,128)

Else

Label1.ForeColor=RGB(I,128,128)

EndIf

EndSub

按‘F5'鍵運行。用鼠標點“開始”按鈕,可以看到標題由背景色漸變為紅色,然后由紅色漸變為背景色。

以上程序均在VisualBasic5.0及WINDOWS95中運行通過。->


發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb
成人免费视频97| 国产最新精品视频| 992tv成人免费影院| 日韩小视频网址| 日韩av手机在线| 一区三区二区视频| 色婷婷久久一区二区| 亚洲成人精品av| 日韩中文字幕欧美| 亚洲精品日韩激情在线电影| 国产97色在线|日韩| 日韩av在线免播放器| 国产性猛交xxxx免费看久久| 久久九九精品99国产精品| 精品视频中文字幕| 精品亚洲一区二区三区四区五区| 日韩av123| 欧美超级乱淫片喷水| 午夜精品一区二区三区在线播放| 2025国产精品视频| 亚洲最大av网| 久久天堂电影网| 欧美日韩第一页| 国产一区二区香蕉| 精品欧美激情精品一区| 成人黄色影片在线| 国产精品爱啪在线线免费观看| 国产精品免费久久久久影院| 国产aⅴ夜夜欢一区二区三区| 91精品视频在线免费观看| 日本道色综合久久影院| 国产不卡一区二区在线播放| 国产精品久久久av| 亚洲国语精品自产拍在线观看| 国产精品美女视频网站| 国产精品1234| 日本高清久久天堂| 日韩av综合中文字幕| 欧美一级电影久久| 亚洲国产精品va在线观看黑人| 国产亚洲激情在线| 亚洲一区二区久久久久久| 国产精品久久久久久久久久三级| 色综合久久精品亚洲国产| 国产成人在线一区二区| 久久在线免费观看视频| 成人性生交大片免费观看嘿嘿视频| 亚洲成人激情在线观看| 国产精品入口夜色视频大尺度| 欧美日韩国产专区| 亚洲欧洲国产精品| 色偷偷偷综合中文字幕;dd| 日韩精品免费在线视频观看| 亚洲一区二区中文字幕| 日韩中文字幕在线免费观看| 视频在线观看99| 亚洲欧美国产视频| 成年人精品视频| 欧美日韩中文在线观看| 亚洲精品午夜精品| 美女黄色丝袜一区| 亚洲国产日韩精品在线| 国产午夜精品理论片a级探花| 精品久久久久久久久久久久久| 精品无人区乱码1区2区3区在线| 夜色77av精品影院| www.久久久久久.com| 在线一区二区日韩| 成人有码视频在线播放| 欧美精品免费在线| 日韩欧美在线看| 欧美日韩精品在线播放| 精品一区精品二区| 国产成人精品在线观看| 美日韩精品免费观看视频| 亚洲欧洲日产国产网站| 精品视频—区二区三区免费| 欧美黑人视频一区| 亚洲精品98久久久久久中文字幕| 日韩欧美有码在线| 国产福利精品视频| 色偷偷噜噜噜亚洲男人的天堂| 国语自产偷拍精品视频偷| 日韩精品在线视频| 亚洲色图17p| 美日韩精品免费观看视频| 国产精品99久久久久久www| 中文字幕日韩av电影| 日韩精品电影网| 欧美成年人网站| 亚洲人成在线电影| 伊人一区二区三区久久精品| 91国产美女在线观看| 日韩二区三区在线| 日韩激情av在线免费观看| 国产精品美女久久久久av超清| 91欧美日韩一区| 成人激情视频在线| 国产综合久久久久| 综合136福利视频在线| 欧美一级电影免费在线观看| 久热精品视频在线观看| 国产中文字幕日韩| 国产偷国产偷亚洲清高网站| 亚洲第一网站免费视频| 亚洲一区二区久久| 久久久久久久久久久av| 日韩成人激情影院| 精品国产欧美成人夜夜嗨| 欧美高清激情视频| 97精品久久久中文字幕免费| 高清亚洲成在人网站天堂| 欧美亚洲另类制服自拍| 亚洲第一福利网站| 日韩在线观看视频免费| 久久免费视频网| 久久69精品久久久久久久电影好| 一夜七次郎国产精品亚洲| 91高潮在线观看| 日韩在线视频线视频免费网站| 亚洲高清在线观看| 国产婷婷成人久久av免费高清| 欧洲亚洲在线视频| 91精品国产高清自在线| 亚洲精品国产综合久久| 色狠狠av一区二区三区香蕉蜜桃| 欧美黑人一级爽快片淫片高清| 91麻豆桃色免费看| 国产精品亚洲欧美导航| 亚洲国产日韩欧美在线图片| 最好看的2019的中文字幕视频| 国产精品日本精品| 国产日韩欧美综合| 成人www视频在线观看| 欧美一级片一区| 欧美日韩中文字幕| 欲色天天网综合久久| 日韩av成人在线观看| 国产精品欧美日韩久久| 国产午夜精品久久久| 欧美极品在线播放| 国产精品三级久久久久久电影| 91久久中文字幕| 欧美老女人性生活| 日日噜噜噜夜夜爽亚洲精品| 国产精品免费视频久久久| 日韩黄色在线免费观看| 国产精品日韩电影| 日韩中文字幕在线播放| 这里只有精品视频在线| 91日本在线视频| 国产精品福利观看| 精品一区二区电影| 国产精品18久久久久久首页狼| 精品福利一区二区| 在线观看欧美www| 欧美在线亚洲一区| 亚洲美女性生活视频| 在线日韩精品视频| 久久激情视频免费观看| 欧美久久久精品| 久久久久久久久久久久av| 国产精品18久久久久久麻辣| 久久天天躁日日躁|