1樓：房恩巨集
為窗體新增隨滑鼠移動的功能的**：
mousedown事件：
'如果是滑鼠左鍵按下
if button = 1 then
'標示為移動狀態
movescreen = true
'得到滑鼠在窗體上的位置（相對與窗體內部座標）mousx = x
mousy = y
end if
mousemove事件
if movescreen then
'計算新的窗體座標值
currx = form1.left - mousx + xcurry = form1.top - mousy + y'移動窗體到新的位置
form1.move currx, curryend if
mouseup事件：
movescreen = false
vb窗體的邊框型別
2樓：在同安飛蓮
無邊框，將form的borderstyle屬性設定為0。
在工作列顯示，設定form的showintaskbar設定為true
3樓：
屬性值為1 - fixed single 與 3 - fixed dialog 時，窗體外觀相同，但功能卻不同。
當屬性為1 - fixed single 時，maxbutton與minbutton這兩個屬性可以起作用。maxbutton為true時窗體上具有了最大化按鈕。minbutton為true時最小化按鈕也有效了。
而當屬性為3 - fixed dialog時，maxbutton與minbutton屬性不起作用。此時maxbutton與minbutton為true，但最大化、最小化按鈕均未出現。
別的區別沒有了
vb 如何將窗體的邊框隱藏
4樓：匿名使用者
1.窗體的borderstyle屬性
2.獲取螢幕的寬和高，然後改變窗體的width和height，可能需要用到setwindowlong()api函式。
3.參考showwindow()api函式。
5樓：匿名使用者
在屬性裡設定
首先確定窗體 然後有個visual 屬性 設定成 false整個螢幕：屬性裡設定 找找看
把bin 目錄下的.exe圖示 傳送到桌面上就行了唄
6樓：匿名使用者
還有做成exe。後怎麼弄成背景？放在桌面圖示後面 這句沒看懂什麼意思。。
其他的**是
private sub form_load()me.borderstyle = 0 '去掉窗體的邊框me.windowstate = 2 '以最大化執行end sub
private sub form_resize()label1.move 0, 0, scalewidth, scaleheight 'label1鋪滿整個窗體
end sub
7樓：說啊———喵
可以在設計階段，通過設定窗體的borderstyle屬性為0-none使窗體無邊框。
窗體的borderstyle屬性有如下取值：
0---none 無邊框
1---fixed single 無最大/最小按鈕，固定單邊，執行時不能窗體改變大小
2---sizeable 標準窗體，預設值
3---fixed dialog 固定對話方塊，沒有最小化和最大化按鈕，執行時不能窗體改變大小
4---fixed toolwindow 固定工具視窗，沒有最小化和最大化按鈕和控制選單，不能改變大小尺寸的
5---sizeable toolwindow 可改變尺寸工具視窗，執行時可改變尺寸大小
VB主窗體如何與子窗體粘合，vb 主窗體如何連線到子窗體
在form1的resize事件中加入控制form2的top,left及width,height的 根據你這個問題 搜了很久 答案非常少 你想實現的效果我明白 就如flash fireworks中那些會自動沾連的窗體 當然簡單的也可以說是vb中的那種效果 上面這個連結中是討論如果讓多窗體同時獲取焦點的...
vb 窗體最大化，VB 窗體最大化
vb程式執行時，把視窗最大化後，視窗是不能被調整大小的 最小化除外 在程式中也不行。設計時，可以正常視窗呈現，並遮蔽窗體的最大化按鈕，自己做個替代的 最大化 按鈕，實現窗體放大。當點選 最大化 時，觸發form的resize事件，在form的resize事件中，寫入 private sub form...
vb中控制窗體位置
樓上提供一種思路，如下 option explicit dim wz as boolean 宣告變數private sub form load me.height screen.height 2me.width screen.width 2end sub private sub form mouse...