在 from1.vb 這個(gè)窗口中點(diǎn)屬性
十余年的新源網(wǎng)站建設(shè)經(jīng)驗(yàn),針對(duì)設(shè)計(jì)、前端、開(kāi)發(fā)、售后、文案、推廣等六對(duì)一服務(wù),響應(yīng)快,48小時(shí)及時(shí)工作處理。營(yíng)銷(xiāo)型網(wǎng)站建設(shè)的優(yōu)勢(shì)是能夠根據(jù)用戶設(shè)備顯示端的尺寸不同,自動(dòng)調(diào)整新源建站的顯示方式,使網(wǎng)站能夠適用不同顯示終端,在瀏覽器中調(diào)整網(wǎng)站的寬度,無(wú)論在任何一種瀏覽器上瀏覽網(wǎng)站,都能展現(xiàn)優(yōu)雅布局與設(shè)計(jì),從而大程度地提升瀏覽體驗(yàn)。創(chuàng)新互聯(lián)公司從事“新源網(wǎng)站設(shè)計(jì)”,“新源網(wǎng)站推廣”以來(lái),每個(gè)客戶項(xiàng)目都認(rèn)真落實(shí)執(zhí)行。
在屬性里有個(gè) text 把后面的空格 加上你所想要的標(biāo)題,如果不想要標(biāo)題,直接為空
點(diǎn)選窗體、一點(diǎn)要點(diǎn)選上.然后在屬性欄里、把text屬性里的字取消、清空、那么窗體的標(biāo)題就沒(méi)有了.
一句兩句說(shuō)不清楚..
建議你去自己學(xué)習(xí)下
希望對(duì)你有幫助..祝你成功
窗口的FormBorderStyle是修改窗口屬性的~,可以改成None這樣就沒(méi)有邊框和標(biāo)題欄了
如果僅僅要去掉標(biāo)題欄,修改窗口ControlBox為false,并吧Text屬性置空就好了
1、無(wú)邊框窗體也就是無(wú)標(biāo)題欄窗體,對(duì)于這樣的窗體移動(dòng)需要編程實(shí)現(xiàn)。
2、vb有兩種辦法實(shí)現(xiàn),一直接編程實(shí)現(xiàn),二調(diào)用windows API編程實(shí)現(xiàn)。
3、這里示例直接編程實(shí)現(xiàn):
Option?Explicit
Dim?BolIsMove?As?Boolean,?MousX?As?Long,?MousY?As?Long
Private?Sub?Form_MouseDown(Button?As?Integer,?Shift?As?Integer,?X?As?Single,?Y?As?Single)
If?Button?=?1?Then?BolIsMove?=?True
MousX?=?X
MousY?=?Y
End?Sub
Private?Sub?Form_MouseMove(Button?As?Integer,?Shift?As?Integer,?X?As?Single,?Y?As?Single)
Dim?CurrX?As?Long,?CurrY?As?Long
If?BolIsMove?Then
CurrX?=?Me.Left?-?MousX?+?X
CurrY?=?Me.Top?-?MousY?+?Y
Me.Move?CurrX,?CurrY
End?If
End?Sub
Private?Sub?Form_MouseUp(Button?As?Integer,?Shift?As?Integer,?X?As?Single,?Y?As?Single)
BolIsMove?=?False
End?Sub
呵呵,最近剛剛研究了這個(gè)方面的東西。
實(shí)現(xiàn)你說(shuō)的效果并不是很難,引用一下第三方控件就可以了。我推薦給你兩個(gè)控件一個(gè)是skin++(又叫skinplusplus),一個(gè)是skinmagic。我是用skin++實(shí)現(xiàn)的vb,skinmagic實(shí)現(xiàn)的vc。實(shí)現(xiàn)起來(lái)并不是很麻煩,控件當(dāng)中對(duì)按鈕、窗體、對(duì)話框、各類(lèi)控件的顏色和形狀都可以進(jìn)行改變,伴隨這控件提供了很多界面方案,效果都是不錯(cuò)的,同時(shí)還有編輯工具、可以自定義方案。
如果你想研究的話,去網(wǎng)上查查兩個(gè)控件的使用方法,demo也是相當(dāng)多的,下個(gè)demo看看你就能搞定了。
或者聯(lián)系我也行,我公司封了qq,找我msn:boyjin821@163.com(或者等我陰了公司的防火墻qq 52964764)(暴金)