1、如果不用用戶控件,那就用Panel,單擊按鈕時顯示相應(yīng)的Panel,隱藏不相關(guān)的Panel。

麗江網(wǎng)站建設(shè)公司創(chuàng)新互聯(lián),麗江網(wǎng)站設(shè)計制作,有大型網(wǎng)站制作公司豐富經(jīng)驗。已為麗江超過千家提供企業(yè)網(wǎng)站建設(shè)服務(wù)。企業(yè)網(wǎng)站搭建\成都外貿(mào)網(wǎng)站建設(shè)要多少錢,請找那個售后服務(wù)好的麗江做網(wǎng)站的公司定做!
2、E死了:
ADD按鈕的Click事件:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'要先新建一個Form2窗口,里面有一個文本輸入框TextBox1和一個按鈕Button1。
Form2.Show() '打開編輯窗口。
End Sub
Form2窗口的Button1按鈕事件Click:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text "" Then '當(dāng)TextBox1的類容不為空時。
Form1.ListView1.Items.Add(TextBox1.Text)'把TextBox1的類容添加到ListView中。
Me.Close()'添加完后關(guān)閉窗口。
Else ’Else,如果為空。
Dim k = MsgBox("類容為空!" Chr(10) "是否取消添加?", vbYesNo)'提醒用戶是否取消向ListView添加類容。
If k = vbYes Then '用戶點擊確認(rèn)時。
Me.Close() '取消操作。
End If
End If
End Sub
新建Form2只要點“項目”“添加Windows窗體”,在彈出的對話框中的“名稱”寫為“Form2.vb”,再“創(chuàng)建”,就行了。之后在里面添加相應(yīng)的用戶控件。
這是6.0的方法:
用
先在每個窗體上畫一個“下一步”按鈕
然后用
窗體名稱.Show的方法
切換窗體
例如:
Form1.show
就可以激活Form1窗體
全局變量建議定義在模塊(Moudle)中
建立模塊的方法是單擊菜單
【工程】|【添加模塊】命令添加
然后用
Public 變量 As 類型
語句來定義全局變量
Public關(guān)鍵字也可以用Global代替
兩者的作用一樣
補充:比如流程是這樣的(VB6.0版)
Form1-Form2-Form3-FormEnd
在每個窗體上畫一個Command按鈕
命名為cmdNext
然后在cmdNext_Click事件中添加代碼:
Form1:
Private Sub cmdNext_Click()
Form2.show
unload me
end Sub
Form2:
Private Sub cmdNext_Click()
Form3.show
unload me
end Sub
Form3:
Private Sub cmdNext_Click()
FormEnd.show
unload me
end Sub
FormEnd:
Private Sub cmdNext_Click()
END
end Sub
其他的自己加上就行了
vb中有例子,你可以嘗試自行研究。
方法:工程
-
添加窗體
-
選項對話框。這個選項對話框已經(jīng)有相關(guān)的應(yīng)用代碼。
不過你可以嘗試人性化的自定義。方法:
工程
-
部件
-
microsoft
windows
common
controls
*.*
點解tabstrip圖標(biāo),添加到窗體。
右鍵點擊tabstrip,選擇屬性,對tabstrip進行自定義。
點擊選項卡,在標(biāo)題欄填寫類似新建、現(xiàn)存、最新等名字。如果需要添加選項卡,可以點擊插入選項卡按鈕
實現(xiàn)點擊切換:我比較喜歡在窗體中添加frame,點擊選項卡則顯示相應(yīng)的frame。例如:
private
sub
tabstripsite_click()
'設(shè)置選項卡點擊顯示情況
for
counter
=
to
tabstripsite.tabs.count
-
1
'從0開始計算判斷所點擊的選項卡
select
case
tabstripsite.selecteditem.caption
'判斷選中的選項卡的標(biāo)題欄(caption)的值
case
frasitebasic.caption
frasitebasic.visible
=
true
'設(shè)置visible狀態(tài)
frasiteowner.visible
=
true
frasitelocal.visible
=
false
frasitepower.visible
=
false
case
frasitelocal.caption
frasitebasic.visible
=
false
frasiteowner.visible
=
false
frasitelocal.visible
=
true
frasitepower.visible
=
false
case
frasitepower.caption
frasitebasic.visible
=
false
frasiteowner.visible
=
false
frasitelocal.visible
=
false
frasitepower.visible
=
true
end
select
next
end
sub
==========
希望能幫上一點忙
VB中的窗體是程序執(zhí)行的窗口,也是其他控件的容器。一個VB工程中可能含有多個窗體,但只有一個窗體是主窗體,VB程序的運行默認(rèn)從主窗體開始。可以在VB6.0 菜單欄“工程”最下方“工程屬性”設(shè)置啟動窗體。
VB是一種面向?qū)ο蟮氖录?qū)動機制的程序設(shè)計語言。窗體的常用事件有Hide(隱藏船體);Show(顯示窗體);Unload(將窗體從內(nèi)存中卸載);Load(將窗體加載到內(nèi)存中)。
切換窗體比如當(dāng)前是窗體1,需要切換到窗體2可以用以下代碼:
Unload Form1 ? ? ? ? ? ? ? ‘從內(nèi)存卸載Form1
Form2.Show ? ? ? ? ? ? ? ? ? ?'顯示Form2,完成切換
如果不想把Form1從內(nèi)存卸載,以后還要用到Form1,可以用以下代碼:
Form1.Hide ? ? ? ? ? ? ? ? ? ? ?'隱藏Form1,但保留在內(nèi)存中
Form2.Show ? ? ? ? ? ? ? ? ? ? '顯示Form2,完成切換
分享文章:vb.net如何切換窗體,winform切換窗體
文章地址:http://chinadenli.net/article17/dsejjdj.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供App設(shè)計、網(wǎng)站建設(shè)、動態(tài)網(wǎng)站、移動網(wǎng)站建設(shè)、網(wǎng)站制作、網(wǎng)站設(shè)計公司
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)