form2 窗體在vb.net中為類的形式存在,必須先定義該類的實例子方可引用.
倉山ssl適用于網(wǎng)站、小程序/APP、API接口等需要進行數(shù)據(jù)傳輸應(yīng)用場景,ssl證書未來市場廣闊!成為成都創(chuàng)新互聯(lián)的ssl證書銷售渠道,可以享受市場價格4-6折優(yōu)惠!如果有意向歡迎電話聯(lián)系或者加微信:18982081108(備注:SSL證書合作)期待與您的合作!
dim f1 as new form2
f2.show
方法很多.
方法一:
Form1上的按鈕的代碼如下
private sub command1_click()
me.hide '窗體一隱藏
form2.show '窗體二顯示
end
Form2上的按鈕的代碼如下
private sub command2_click()
me.hide '窗體二隱藏
form1.show '窗體一顯示
end
方法二:
Form1上的按鈕的代碼如下
private sub command1_click()
Me.Visible = False '窗體一隱藏
form2.show '窗體二顯示
end
Form2上的按鈕的代碼如下
private sub command2_click()
Me.Visible = False '窗體二隱藏
form1.show '窗體一顯示
end
方法三:
Form1上的按鈕的代碼如下
private sub command1_click()
unload me '窗體一隱藏
form2.show '窗體二顯示
end
Form2上的按鈕的代碼如下
private sub command2_click()
unload me '窗體二隱藏
form1.show '窗體一顯示
end
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
==========
希望能幫上一點忙
1、如果不用用戶控件,那就用Panel,單擊按鈕時顯示相應(yīng)的Panel,隱藏不相關(guān)的Panel。
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)的用戶控件。
在Form1中
Private Sub Command1_Click()
Form2.Show
Me.Hide
End Sub
在Form2中
Private Sub Command1_Click()
Form1.Show
Me.Hide
End Sub
--------------------------】、
希望能采納
'Form1 Code
Option Explicit
Private Sub Command1_Click()
Me.Hide
Form2.Show
End Sub
Private Sub Form_Click()
Unload Me
Unload Form2
End Sub
'Form2 Code
Option Explicit
Private Sub Command1_Click()
Me.Hide
Form1.Show
End Sub