十年網(wǎng)站開發(fā)經(jīng)驗(yàn) + 多家企業(yè)客戶 + 靠譜的建站團(tuán)隊(duì)
量身定制 + 運(yùn)營(yíng)維護(hù)+專業(yè)推廣+無(wú)憂售后,網(wǎng)站問(wèn)題一站解決
有兩種方法unload me 和end,但是效果是不同的 如果你指的是關(guān)閉窗口的話 1. Sub Command1_Click() unload me End Sub 此段代碼將卸載自身窗口, 如果按鈕在主窗口上(form1), 所有窗口將被關(guān)閉(卸載),程序?qū)⒔Y(jié)束 如果按鈕在另一個(gè)窗口(form2或其他)上, 將卸載另一窗口, 其他窗口不被卸載 注:卸載指窗口在內(nèi)存中的數(shù)據(jù)被釋放 2. Sub Command1_Click() end End Sub 按鈕在任何窗口上執(zhí)行代碼, 所有窗口被卸載 程序都將結(jié)束 3. Sub Command1_Click() me.hide End Sub 次段代碼將隱藏自身窗口 窗口內(nèi)代碼繼續(xù)執(zhí)行 只不過(guò)窗體我們看不到 隨時(shí)可用me.show顯示此窗口 、悲傷的獨(dú)奏曲
創(chuàng)新互聯(lián)建站專注于企業(yè)全網(wǎng)整合營(yíng)銷推廣、網(wǎng)站重做改版、仁壽網(wǎng)站定制設(shè)計(jì)、自適應(yīng)品牌網(wǎng)站建設(shè)、html5、商城網(wǎng)站定制開發(fā)、集團(tuán)公司官網(wǎng)建設(shè)、外貿(mào)網(wǎng)站建設(shè)、高端網(wǎng)站制作、響應(yīng)式網(wǎng)頁(yè)設(shè)計(jì)等建站業(yè)務(wù),價(jià)格優(yōu)惠性價(jià)比高,為仁壽等各大城市提供網(wǎng)站開發(fā)制作服務(wù)。
窗體enalbed的問(wèn)題
一個(gè)A窗體 點(diǎn)一項(xiàng)菜單彈出一個(gè)新窗體B
想讓B窗體彈出后 A窗體的enabled就變?yōu)閒alse
然后B窗體關(guān)閉以后 A窗體重新恢復(fù)enalbed = true
A窗體里面的菜單響應(yīng)代碼是
dim newframe as new frameB()
newframe.show()
me.enabled = false
此代碼可以實(shí)現(xiàn)B窗體彈出后 A窗體不能選也不能動(dòng)
問(wèn)題是B窗體關(guān)閉以后如何恢復(fù)A窗體的enalbed的屬性
代碼應(yīng)該怎么寫 是寫在A窗體的代碼里面 還是B窗體的代碼里面?
B窗體里面怎么修改 A窗體對(duì)象的屬性?
2
關(guān)閉窗體問(wèn)題
關(guān)閉一個(gè)窗體的時(shí)候,點(diǎn)右上角的X和代碼me.colse() 是不是一回事?
要怎么關(guān)閉一個(gè)窗體才能完全釋放內(nèi)存?
我編的程序在退出后,總是在任務(wù)管理器里面還可以看到進(jìn)程,怎么解決?
3
模塊問(wèn)題
我想把一些所有窗體都會(huì)用到的變量 和 函數(shù) 放到一個(gè)模塊里面,比如說(shuō)modu1.vb。
這些變量和函數(shù)是不是要定義成全局的? 怎么定義? 比方說(shuō)要定義一個(gè)字符串要怎么寫?
然后,其他的窗體要用到這些變量和函數(shù)的是侯,在他們各自窗體的代碼里面是不是要加一句話?怎么加?加在什么地方?
更多 0 分享到:
相關(guān)主題推薦: 對(duì)象 管理 內(nèi)存 as x
相關(guān)帖子推薦:
c# RemObjects.SDK.Serializer 拆箱搞不定,求助網(wǎng)絡(luò)在線考試系統(tǒng)項(xiàng)目源碼親測(cè)sqlserver版本$("#XX")和$(XX)有什么樣的區(qū)別??宏碁axc-105 2G內(nèi)存卻只有1.44G可用初學(xué)java 請(qǐng)幫忙看下多個(gè)tomcat啟動(dòng)問(wèn)題 非端口占用以下執(zhí)行的js代碼中,代碼執(zhí)行完畢,變量得到釋放了嗎?請(qǐng)問(wèn)android內(nèi)存中的shared dirty memory,shared指的是什么啊
直接用End
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
End
End Sub