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

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

在VisualBasic中實現啟動程序時的閃爍屏幕

2019-11-18 17:36:24
字體：大 中 小
來源：轉載
供稿：網友
----在大量的應用軟件中，軟件啟動后一幅畫面有幾秒的信息顯示，列出產品、平臺、版本號和版權信息，稱之為“啟動程序時的閃爍屏幕”。在VisualBasic中是如何實現的呢？本文討論生成啟動屏幕的一種方法，并使之多彩化。做到啟動屏幕在桌面停留時，提示文字在桌面上“流動”(如《東方快車》啟動畫面)。同時也可以實現流動文字的閃爍、變色等效果。如果在文字底部設置畫面，文字可以從畫面上流動。待顯示完畢從畫面頂部消失后，可重新從畫面底部冉冉升起，循環出現。這樣設計后，可用在軟件說明及著作者列表等等，以豐富的軟件的畫面顯示效果。

----取工程1，窗體Form1、Form2，設Form1為啟動窗體。在Form2上新建Frame1、Timer1和Temer2，Frame1的Caption屬性設置成空值，以形成美觀的立體邊框。Timer1和Temer2的Enabled的屬性設為True。在Frame1上創建Picture1，調整Picture1為合適大小。將Form1的ScaleMode屬性設為1-Twip，Form2的StartUpPosition屬性設為2-CenterScreen(中心對齊)。為了保證窗體Form2不顯示窗體最上面的“藍色說明條”，將Caption屬性設為空值，ControlBox屬性設為False即可。在Picture1上創建標簽Label1，調整BackStyle為0(透明)。在Label1的Caption屬性填寫“作者：沈陽姜雪小姐”一段文字，以便觀察。調整文字的大小、顏色。在窗體Form2上可隨意設置版面信息。

----Form1代碼如下：

I=I 1
IfI>50Then'窗體Form2停留時間，可以調整大小
UnloadMe
Form1.Show
Timer1.Enabled=False
Timer2.Enabled=False
EndIf
EndSub
SubColor(CtrlAsControl,color1AsInteger,
color2AsInteger,color3AsInteger)'選取顏色
IfVal(Ctrl.Tag)=color1Then
Ctrl.Tag=color2
ElseIfVal(Ctrl.Tag)=color2Then
Ctrl.Tag=color3
ElseIfVal(Ctrl.Tag)=color3Then
Ctrl.Tag=color1
Else
Ctrl.Tag=color1
EndIf
Ctrl.ForeColor=QBColor(Ctrl.Tag)
EndSub

PrivateSubTimer2_Timer()'控制文字移動位置及速度
Step1=1800:Step2=4500:Step3=40
IfLabel1.Top<-Step1-Label1.TopThen
Label1.Top=Label1.Top Step2
EndIf
Label1.Top=Label1.Top-Step3
EndSub

----可以調整Timer1.Interval、Timer2.Interval值的大小，它們分別決定文字顏色變換速度及文字流動速度；根據窗體和控件情況調整Step1、Step2為合適值；Step3為文字跳躍步長；通過改變ColorLabel1，I，J，K語句中的I，J，K值來改變文字的變換顏色。在中文VisualBasic5.0下實現。->

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb
亚洲欧美日韩一区在线| 激情久久av一区av二区av三区| 精品免费在线视频| 亚洲国产高清自拍| 亚洲高清一二三区| 久久精品久久精品亚洲人| 一道本无吗dⅴd在线播放一区| 日韩免费观看av| 91免费视频国产| 国产精品国产亚洲伊人久久| 日韩在线观看你懂的| 日韩电视剧免费观看网站| 国产高清视频一区三区| 国产大片精品免费永久看nba| 成人xvideos免费视频| 成人久久久久久| 91国产高清在线| 国产精品精品久久久| 亚洲视频欧美视频| 欧美电影电视剧在线观看| 日韩视频欧美视频| 精品国内自产拍在线观看| 日本精品久久久久久久| 成人免费观看网址| 精品国产欧美成人夜夜嗨| 亚洲欧美999| 日韩精品在线视频美女| 91精品视频观看| 日韩av在线免费观看| 91精品国产高清久久久久久91| 91在线观看免费| 国产91对白在线播放| 亚洲欧美激情精品一区二区| 亚洲无线码在线一区观看| 中文字幕一区二区三区电影| 欧美日韩在线影院| 亚洲加勒比久久88色综合| 国产精品白嫩美女在线观看| 爽爽爽爽爽爽爽成人免费观看| www.久久草.com| 色妞在线综合亚洲欧美| 日韩av大片免费看| 在线日韩欧美视频| 超碰91人人草人人干| 亚洲黄在线观看| 欧美黄色免费网站| 欧美性色视频在线| 亚洲视频777| 国精产品一区一区三区有限在线| 亚洲一区二区久久久久久久| 欧美在线观看视频| 国产精品福利在线| 日韩电影中文字幕一区| 欧美黄色成人网| 亚洲精品美女久久| 午夜精品久久久久久99热软件| 欧美极品少妇xxxxⅹ喷水| 成人免费视频97| 国产欧美日韩精品丝袜高跟鞋| 中日韩美女免费视频网址在线观看| 性金发美女69hd大尺寸| 国产亚洲精品va在线观看| 欧美日韩一区二区免费在线观看| 亚洲最大在线视频| 日本韩国在线不卡| 美日韩精品免费视频| 亚洲第一页在线| 日韩成人网免费视频| 狠狠色狠色综合曰曰| 国产精品久久久久久av福利| 欧美成人性色生活仑片| 992tv在线成人免费观看| 91高潮在线观看| 国产91露脸中文字幕在线| 在线中文字幕日韩| 亚洲qvod图片区电影| 国产欧美精品久久久| 久久久久999| 欧美国产亚洲视频| 久久精品国产久精国产思思| 午夜精品www| 姬川优奈aav一区二区| 91午夜在线播放| 91久久中文字幕| 亚洲天堂免费观看| 日韩精品亚洲视频| 亚洲综合日韩在线| 69影院欧美专区视频| 日韩欧美有码在线| 亚洲三级av在线| 国产精品美女主播在线观看纯欲| 亚洲欧美国产一区二区三区| 亚洲天堂影视av| 亚洲成人黄色网址| 国产综合久久久久| 国产成人综合亚洲| 97成人精品区在线播放| 精品日韩中文字幕| 国产成人jvid在线播放| 国产不卡在线观看| 欧美高清不卡在线| 2020久久国产精品| 中文字幕免费国产精品| 久久男人资源视频| 91av视频在线观看| 91久久久久久| 亚洲性69xxxbbb| 欧美一级视频在线观看| 久久在线免费观看视频| 免费91在线视频| 欧美激情一区二区三区在线视频观看| 97av在线影院| 亚洲国产三级网| 欧美视频在线观看免费| 国产欧美日韩中文字幕| 国产精品亚洲视频在线观看| 国产精品视频久久久久| 国产精品永久免费在线| 国产激情久久久| 国产精品69久久| 91国产精品91| 亚洲风情亚aⅴ在线发布| 国产精品自在线| 日韩在线观看免费高清| 精品久久久久久久久久久久久久| 精品国产福利在线| 91国内在线视频| 国产亚洲aⅴaaaaaa毛片| 一本色道久久综合狠狠躁篇怎么玩| 亚洲一区二区三区777| 国产精品1234| 久久久国产视频91| 亚洲91精品在线| 久久青草精品视频免费观看| 亚洲区在线播放| 中文欧美在线视频| 欧美大片欧美激情性色a∨久久| 中文字幕在线观看日韩| 色综合久综合久久综合久鬼88| 国产伦精品一区二区三区精品视频| 国产精品高潮呻吟久久av无限| 九九九久久国产免费| 精品福利视频导航| 欧美精品激情视频| 在线播放日韩av| 成人黄色免费片| 亚洲va欧美va国产综合剧情| 国产一区二区三区三区在线观看| 国产精品久久久久秋霞鲁丝| 国产精品久久久久久久久久| 欧美久久精品一级黑人c片| 国产精品扒开腿做| 亚洲国产欧美一区二区三区同亚洲| 亚洲国产日韩欧美综合久久| 日韩三级影视基地| 97香蕉久久夜色精品国产| 97欧美精品一区二区三区| 精品调教chinesegay| 久久免费在线观看| 精品国产31久久久久久| 国内精品久久久久| 亚洲国产欧美自拍| 中文字幕亚洲无线码在线一区| 日韩精品中文在线观看|