1、如果上一個窗體是程序的主窗體(默認是程序的第一個窗體),
成都創(chuàng)新互聯(lián)堅持“要么做到,要么別承諾”的工作理念,服務領域包括:做網(wǎng)站、網(wǎng)站制作、企業(yè)官網(wǎng)、英文網(wǎng)站、手機端網(wǎng)站、網(wǎng)站推廣等服務,滿足客戶于互聯(lián)網(wǎng)時代的西安網(wǎng)站設計、移動媒體設計的需求,幫助企業(yè)找到有效的互聯(lián)網(wǎng)解決方案。努力成為您成熟可靠的網(wǎng)絡建設合作伙伴!
則不能關閉這個窗體,只能隱藏(Me.Hide())這個窗體,否則整
個程序就被關掉了。
2、如果上一個窗體不是程序的主窗體,可以用Me.Close()
關閉。
工程的啟動界面你設成welcome.vb了吧,把它換成login.vb的窗口,從login.vb的窗口中調(diào)用welcome.vb,然后這個me.close()應該就能好使了
----------------------------------------------------
挺長時間沒用VB.NET了,在你設置完啟動界面為login后,進入login的代碼處,在 Public Class Form1下敲入Sub New()也就是初始化。在那里面寫入調(diào)用welcome的窗口程序
Dim frm as New welcome,
還要寫一個判斷
if frm.showDialog=Windows.Forms.DialogResult.Cancel
(里面隨你以后工程需要自己添加)
end if
這樣你在welcome里面用timer控制關閉的時候就可以寫me.close()了。 不知道樓主明不明白......
部分代碼如下:
在窗口及WebBrowser創(chuàng)建完以后,寫此代碼:
WebBrowser.OnNewWindow2:=IE1NewWindow2;
給主窗口創(chuàng)建一個方法:
procedure TBrowForm.IE1NewWindow2(Sender: TObject; var ppDisp: IDispatch;var Cancel: WordBool);
Var NewForm:TBrowForm;
begin
try
NewForm :=TPopBrowerForm.Create(application);
NewForm.WebBrowser.OnNewWindow2 :=IE1NewWindow2;//如果在窗口的Oncreate事件
//有此代碼,此處就可以省略
ppDisp := NewForm.WebBrowser.Application;
NewForm.Show;
Cancel:=false;
except
end;
end;
這樣寫,每次點擊按鈕事件都會創(chuàng)建一個新的form。
你想要的效果是主窗口生命周期內(nèi),子form是一個。
根據(jù)這個你再考慮下怎么實現(xiàn)。比如主form加載時創(chuàng)建子form。點擊事件中去獲取子form的焦點。
名稱欄目:vb.net開新窗口 vbnet ui
文章分享:http://chinadenli.net/article34/dogedse.html
成都網(wǎng)站建設公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站制作、建站公司、面包屑導航、網(wǎng)站設計公司、網(wǎng)站設計、微信小程序
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)