1樓:戲皖靜
用setlayeredwindowattributes,如果你是用它來遮蔽制定顏色來達到做異型視窗的話,建議換種方法,用setwindowrgn來設定視窗形狀,用setlayeredwindowattributes設定視窗透明度。
vb 關閉窗體問題
2樓:網友
private sub form_unload(cancel as integer)
if msgbox("確定退出嗎?", vbyesno) = vbno then
cancel = 1
end if
end sub就是。
整個程式退出的方法用end。
3樓:天遠網路科技
如果你是mdiform 拷貝這個到你的源**中。
private sub mdiform_unload(cancel as integer)
cancel = -1
if msgbox("確定要退出本系統嗎?", 33, "提示") = vbok then
endend if
end sub
如果你是普通窗體拷貝這個。
private sub form_unload(cancel as integer)
cancel = -1
if msgbox("確定要退出本系統嗎?", 33, "提示") = vbok then
endend if
end sub
vb 如何關閉窗體
4樓:彘者_小南
1.按右上角的「x」
2.弄乙個按鈕,**:unload me
5樓:網友
(隱藏不卸下記憶體)
或者unload me (卸下記憶體)
vb 關於關閉窗體啊
6樓:網友
新增乙個標準模組,在該模組中public shut as boolean,然後改一下相應的**。
private sub form_queryunload(cancel as integer, unloadmode as integer)
if shut =false then
cancel = true
end if
end sub
private sub command4_click()dim frm as form
shut=true
for each frm in formsif <>then
unload frm
end if
next end sub
然後要注意的是,除了在command4_click()外,其他都要保證shut為false。
7樓:網友
如果直接dim frm as new 9窗體。
9窗體。dispose呢?
我是新手,錯的話別怪。
vb 退出提示 確認後關閉其他窗體
8樓:網友
unload 窗體名。
點x後在 unload裡寫**。
9樓:棘棘芽
private sub form_unload(cancel as integer)
if msgbox("確認退出程式!", vbokcancel, "程式能出") = vbcancel then
cancel = 1 '取消退出。
exit sub
end if
end '這裡只是為了確認退出多個視窗的程式end sub
10樓:veket的小號
給你寫了完整** 忘能採納。
vb 關於關閉窗體的問題
11樓:網友
我想知道你這樣做的目的是什麼?因為你想關閉9窗體,又在9窗體中加**禁止別的窗體來關閉它,這樣不是很矛盾嗎?
如果僅僅是想隱藏 **不用這麼麻煩的。
12樓:沒權保持沉默
給command4乙個click事件。
就可以!
VB60程式中設計窗體,在窗體上新增標籤和文字
按要求在窗體上新增乙個標籤和乙個文字框以及乙個命令按鈕,雙擊命令按鈕,刪除所有 複製如下 到程式中private sub mand1 click if val text1 mod 2 0 thenlabel1 偶數 else label1 奇數 end if end sub private sub ...
vb60怎麼安裝系統是,VB6 0怎麼安裝 系統是WIN
我就是win7 64位旗艦版,安裝的是vb6.0的精簡版。不過vb6.0必須在win7下面修改一下相容性,不然win7特效會讓vb6.0各種控制項像烏龜一樣慢,修改方法是,在安裝好的vb6.0.exe檔案上點滑鼠右鍵,選擇屬性,然後按照下圖操作。可以安裝。用管理員許可權執行。win7 64位系統怎麼...
簡述vb6 0的主要特點,簡述VB6 0的主要特點
隨著visual basic 的逐步發展完善和功能的不斷括展,很多軟體開發人員利用visual basic 開發了大量的應用軟體。visual basic 已經成為使用人數最多,應用領域最廣的程式語言和軟體開發工具.特點 1.物件導向和視覺化的程式設計.visual basic 實現了物件的封裝,是...