form的opacity屬性和form的transparencykey屬性 opacity數(shù)據(jù)類型為雙精度浮點型,它決定窗體本身的透明度。 例:me.opacity=0.5 transparencykey的屬性決定窗體上的控件的所在區(qū)域是否完全透明。當窗體上的控件的背景色與窗體的transparencykey屬性相同時,則該控件的所在區(qū)域完全透明。 例:me.transparencykey=color.red me.textbox1.backcolor=color.red 上面的代碼為窗體上的textbox控件完全透明
成都創(chuàng)新互聯(lián)專注于網(wǎng)站建設(shè),為客戶提供成都網(wǎng)站建設(shè)、網(wǎng)站制作、網(wǎng)頁設(shè)計開發(fā)服務(wù),多年建網(wǎng)站服務(wù)經(jīng)驗,各類網(wǎng)站都可以開發(fā),品牌網(wǎng)站建設(shè),公司官網(wǎng),公司展示網(wǎng)站,網(wǎng)站設(shè)計,建網(wǎng)站費用,建網(wǎng)站多少錢,價格優(yōu)惠,收費合理。
描述不夠清楚,也沒有圖。你的界面是什么界面,是窗體還是其他的什么。
如果是窗體,他會讓你導入圖片,作為資源存在工程里面。
如果不是,你先要把背景圖片放到資源里再調(diào)用。
又或者你的界面圖片被別的控件擋住了,你需要將別的控件的backcolor屬性改為transparent。
總之你想問什么問題,你得描述清楚。
轉(zhuǎn)載此出處
說到換膚,我們腦子當中可能就會浮現(xiàn)很多商業(yè)軟件那些漂亮的皮膚,自從XP流行以來,程序的外觀變得比以往更加引人注意,像Office 系列的界面,一直是很多程序員模仿的范例,今天我就利用Xtreme Suite Pro ActiveX 輕松的給自己程序加上皮膚應(yīng)用功能,為我們自己的程序增色。
目標:制作一個具有換膚功能的程序,程序界面模仿Office 2007樣式
一、準備工作
1、開發(fā)工具VB6,當然也可以用.Net,這里以VB6做示例
2、Xtreme Suite Pro ActiveX 12英文正式版
下載地址為:
Part1:
Part2:
二、工具安裝
1、VB6的安裝不多說
2、將上述下載地址的兩個文件下載后放在同一個目錄下,然后解壓Part1,解壓完成后,可以看到一個setup.exe文件,按提示安裝,其中Sn在對應(yīng)的文本中,注意我們選用的Sn為Xtreme Suite Pro ActiveX v12.0.1 英文正式版的,Xtreme Toolkit Pro v12.0.1是針對MFC的,不要輸入錯誤。
現(xiàn)在假設(shè)Xtreme Suite Pro ActiveX 按照默認方式已安裝成功,那邊我們可以進入到下一步了。
三、正式開始
1、新建一個VB6的EXE工程
2、在工具欄上點擊右鍵找到部件,因為Xtreme Suite Pro ActiveX 已安裝成功,所以我們可以看到部件引用中有如下內(nèi)容
(圖1)
勾中xtreme SkinFramework ActiveX Control 12.0.1,此時我們的界面當中應(yīng)該可以看到類似下面的圖片
(圖2)
到這里,我們的準備工作已完全準備妥當,下面是關(guān)鍵的代碼,我們將其放在Form_Load事件中
Private Sub Form_Load()
Dim FileName as string
Dim IniFile as string
FileName ="C:/Program Files/Codejock Software/ActiveX/Xtreme SuitePro ActiveX v12.0.1/Samples/SkinFramework/Styles/Office2007.cjstyles"
IniFile="NormalBlue.ini"
SkinFramework1.LoadSkin Dlg.FileName, IniFile
SkinFramework1.ApplyWindow Me.hWnd
SkinFramework1.ApplyOptions = SkinFramework1.ApplyOptions Or xtpSkinApplyMetrics
End Sub
這里我們利用SkinFramework的LoadSkin方法找到指定的皮膚文件,然后再調(diào)用ApplyWindow方法,并且設(shè)置了ApplyOptions 屬性,注意這里的設(shè)置其實就是SkinFramework的默認值。
按F5運行工程,出現(xiàn)在我們眼前的界面將是下面這個樣子了
(圖3)
簡單的引用,簡單的代碼,出現(xiàn)在我們面前的卻已經(jīng)是如此漂亮的界面,到這里我們已大告功成了。
四、擴展
Xtreme Suite Pro ActiveX 的SkinFramework 不但支持以cjstyles為擴展的皮膚文件,同時也支持XP的themes文件,即以msstyles為擴展名的文件,知道了這點我們的皮膚來源就非常廣了。
下面為大家推薦一個地方,里面有很多免費的皮膚
安裝完Xtreme Suite Pro ActiveX ,官方即包含Office2007.cjstyles,Vista.cjstyles,WinXP.Luna.cjstyles,WinXP.Royale.cjstyles四個皮膚文件,同一個皮膚文件中可能包含幾個配置文件,比如Office2007.cjstyles就包含NormalBlue.ini 、NormalAqua.ini 、NormalSilver.ini 、NormalBlack.ini 四個配置文件,可以放在LoadSkin方法的第二個參數(shù)中,就可以顯示不同配置文件所達到的不同皮膚的效果。
為了讀取皮膚文件所包含的配置文件,我們可以用下面的方法
Dim Discription As SkinDescription
Dim i As Integer
Dim FileName as string
FileName ="C:/Program Files/Codejock Software/ActiveX/Xtreme SuitePro ActiveX v12.0.1/Samples/SkinFramework/Styles/Office2007.cjstyles"
Set Discription = SkinFramework1.EnumerateSkinFile(FileName )
For i = 0 To Discription.Count - 1
debug.print "IniFile:" Discription.IniFile(i).IniFileName "/ColorScheme:" Discription.IniFile(i).ColorScheme _
"/FontSize:" Discription.IniFile(i).FontSize
Next
寫到這里,我們才真正搞定了皮膚的開發(fā),為了大家的使用方便,我特意寫了一個示例程序
下載地址為:
另外這里包含了幾個皮膚文件:
有興趣的可以參考一下
不難的,vb點虐 的語言比vb的完整些而已。而且一樣可以利用英文的理解方法理解vb點虐 的代碼,相對來說,vb點虐 更容易。語法來看,vb多數(shù)是用縮寫的,而vb點虐 是用完整的單詞,更便于理解,而且API也簡化了很多。
所以,vb轉(zhuǎn)vb點虐 是很容易上手的。
分享文章:vb點虐
界面換膚 vbnet ui
文章出自:http://muchs.cn/article8/ddcgpop.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供定制網(wǎng)站、手機網(wǎng)站建設(shè)、App設(shè)計、營銷型網(wǎng)站建設(shè)、網(wǎng)站收錄、小程序開發(fā)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)