麻豆小视频在线观看_中文黄色一级片_久久久成人精品_成片免费观看视频大全_午夜精品久久久久久久99热浪潮_成人一区二区三区四区

首頁 > 學院 > 開發(fā)設計 > 正文

VisualBasic5.0多媒體創(chuàng)作技巧

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

一、背景音樂

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

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

二、透明效果立體按鈕

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

進入VisualBasic5.0系統(tǒng)環(huán)境，建立一個新的表單（FORM1），并設置FORM1的Picture屬性為一個WINDOWS位圖文件（.BMP）。
鼠標點擊“表單控制欄”中的“形狀”，并在FORM1上拉出一個矩形方框（SHAPE1）。以同樣方法創(chuàng)建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），調(diào)整其大小以剛好嵌入四個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系統(tǒng)環(huán)境，建立一個新的表單（FORM1），并設置FORM1的Backcolor屬性為一個RGB(192,192,192)。
鼠標點擊“表單控制欄”中的“標簽”，并在FORM1上拉出一個矩形方框（LABEL1）。設置它的屬性Caption為“活動字幕演示”，Autosize為.T.，Backstyle為0，F(xiàn)orecolor為RGB（128,128,128），F(xiàn)ontname為“隸書體”,Fontbold為.T.，F(xiàn)ontsize為36。
鼠標點擊LABEL1，按CTRL C（拷貝）鍵，再按CTRL V（粘貼）鍵，在FORM1上創(chuàng)建另一個標題與LABEL1相同的標簽（LABEL2），設置它的Forecolor屬性為RGB（255，255，0）。調(diào)整LABEL2的位置，使其剛好比LABEL1高一些，使LABEL1看起來象LABEL2的陰影。
鼠標點擊“表單控制欄”中的“計時器”，再在FORM1上點擊一下，即可在FORM1上創(chuàng)建一個計時器（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'鍵運行即可見到字幕由屏幕右方出現(xiàn)，移至屏幕最左方消失。

四、文字的淡入淡出

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

進入Visual　Basic5.0系統(tǒng)環(huán)境，建立一個新的表單（FORM1）。
鼠標點擊“表單控制欄”中的“標簽”，并在FORM1上拉出一個矩形方框（LABEL1）。設置它的屬性Caption為“文字的淡入淡出”，Autosize為.T.，Backstyle為0，文字顏色為RGB（0,128,128），字體為“隸書體”,Fontbold為.T.，字體大小為36。
鼠標點擊“表單控制欄”中的“計時器”，再在FORM1上點擊一下，即可在FORM1上創(chuàng)建一個計時器（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'鍵運行。用鼠標點“開始”按鈕，可以看到標題由背景色漸變?yōu)榧t色，然后由紅色漸變?yōu)楸尘吧?br>
以上程序均在VisualBasic5.0及WINDOWS95中運行通過。->

發(fā)表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發(fā)表
主站蜘蛛池模板： 国产亚洲区 | 一级毛片免费一级 | www视频免费在线观看 | 中文字幕精品在线观看 | 热99re久久免费视精品频软件 | 欧美精品欧美 | 国产精品自拍啪啪 | 在线亚洲综合 | 91麻豆精品国产91久久久无需广告 | 国产成人在线一区 | 国产精品亚洲欧美一级在线 | 精品国内视频 | 成人免费福利视频 | 视频一区二区精品 | av黄色片网站 | 久久999久久| 主播粉嫩国产在线精品 | 免费播放欧美毛片 | 久久精品性视频 | 免费a级毛片大学生免费观看 | 久久久久免费精品国产小说色大师 | 久草在线最新 | 日日草夜夜| 国产免费人做人爱午夜视频 | 女18一级大黄毛片免费女人 | 美国一级黄色毛片 | 91精品国产综合久久久动漫日韩 | av成人在线观看 | 鲁丝一区二区二区四区 | 嫩草91在线 | 一区二区三区四区高清视频 | 在线免费观看欧美 | 蜜桃av网| 国产成人高清在线观看 | 亚洲一区二区在线 | 黄色免费小视频网站 | 在线日韩av电影 | 亚洲综合一区二区三区 | 中文在线国产 | 国产精品一区二区日韩 | 国产欧美在线一区二区三区 |