登陸按鈕里寫:

創(chuàng)新互聯(lián)服務(wù)項(xiàng)目包括和布克賽爾蒙古網(wǎng)站建設(shè)、和布克賽爾蒙古網(wǎng)站制作、和布克賽爾蒙古網(wǎng)頁制作以及和布克賽爾蒙古網(wǎng)絡(luò)營銷策劃等。多年來,我們專注于互聯(lián)網(wǎng)行業(yè),利用自身積累的技術(shù)優(yōu)勢、行業(yè)經(jīng)驗(yàn)、深度合作伙伴關(guān)系等,向廣大中小型企業(yè)、政府機(jī)構(gòu)等提供互聯(lián)網(wǎng)行業(yè)的解決方案,和布克賽爾蒙古網(wǎng)站推廣取得了明顯的社會(huì)效益與經(jīng)濟(jì)效益。目前,我們服務(wù)的客戶以成都為中心已經(jīng)輻射到和布克賽爾蒙古省份的部分城市,未來相信會(huì)繼續(xù)擴(kuò)大服務(wù)區(qū)域并繼續(xù)獲得客戶的支持與信任!
private void button1_Click(object sender, EventArgs e)
{
Form2 fo1 = new Form2();
fo1.Show();
this.Visible=false;
}
第2個(gè)窗體的關(guān)閉事件里寫
private void Form2_FormClosed(object sender, FormClosedEventArgs e)
{
Application.Exit();
}
這樣就可以了
me.dispose(); 這個(gè)是釋放本對象的資源,,有時(shí)候直接把這個(gè)對象就清理了,,登陸窗體如果是入口窗體的話,,這么寫就等于Application.Exit();
直接關(guān)整個(gè)應(yīng)用程序了
插紅旗噢 我還去vs里敲了一下
可以參考下面的代碼:
Dim?myexcel As excel.Application
On Error Resume Next
Set myexcel = GetObject(, "Excel.Application")
myexcel.Application.ScreenUpdating = False
擴(kuò)展資料:
VB.NET關(guān)鍵詞
Namespace包含類似或相關(guān)功能的類的集合
Class用來定義一個(gè)類用以存儲對象的屬性、方法和事件
Sub子過程,可以把要使用的數(shù)據(jù)以參數(shù)形式傳入,但不返回值
Function函數(shù),同樣可以傳參數(shù),但要求有返回值
Property屬性過程,設(shè)置或返回對象的屬性值
Nothing表示一個(gè)變量沒有值,與其他語言或數(shù)據(jù)庫中的null等價(jià)
參考資料來源:百度百科-Visual Basic .NET
Public?Class?Form1
System.Runtime.InteropServices.DllImport("user32.dll")?_
Private?Shared?Function?SendMessage(ByVal?hWnd?As?Integer,?ByVal?Msg?As?Integer,?ByVal?wParam?As?Integer,?ByVal?lParam?As?Integer)?As?Integer
End?Function
Const?SC_MONITORPOWER?As?Integer?=?HF170
Const?WM_SYSCOMMAND?As?Integer?=?H112
Private?Enum?MonitorMode?As?Integer
[ON]?=?-1
STANBY?=?1
OFF?=?2
End?Enum
Private?Sub?ChangeMonitorState(ByVal?mode?As?MonitorMode)
SendMessage(-1,?WM_SYSCOMMAND,?SC_MONITORPOWER,?CInt(mode))
End?Sub
Private?Sub?Off()
ChangeMonitorState(MonitorMode.OFF)
End?Sub
Private?Sub?[On]()
ChangeMonitorState(MonitorMode.[ON])
End?Sub
Private?Sub?StandBy()
ChangeMonitorState(MonitorMode.STANBY)
End?Sub
Private?Sub?Button1_Click(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Button1.Click
Off()
End?Sub
Private?Sub?Form1_KeyDown(ByVal?sender?As?Object,?ByVal?e?As?System.Windows.Forms.KeyEventArgs)?Handles?Me.KeyDown
If?e.KeyCode?=?Keys.Escape?Then?[On]()
End?Sub
End?Class
按button1按鈕關(guān)閉顯示器,按Esc鍵打開顯示器
me.dispose()
樓主針對這個(gè)問題我也糾結(jié)過很久不過就在剛剛我找到了問題所在:
還是用me.close()
打開
項(xiàng)目
》
最下面一行有一個(gè)屬性》
應(yīng)用程序》下面
有一個(gè)關(guān)機(jī)模式
改為:當(dāng)最后一個(gè)窗體關(guān)閉時(shí)。。。注意
me.close要寫在窗體show()后面
例如
寫成
f2.show()
me.close()
不要寫成
me.close()
f2.show()
本文名稱:vb.net關(guān)閉屏幕 vbnet關(guān)閉一個(gè)窗體
標(biāo)題鏈接:http://chinadenli.net/article20/hjocco.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供虛擬主機(jī)、外貿(mào)網(wǎng)站建設(shè)、手機(jī)網(wǎng)站建設(shè)、微信小程序、品牌網(wǎng)站制作、軟件開發(fā)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來源: 創(chuàng)新互聯(lián)