首先要添加兩個(gè)窗體,假設(shè)第一個(gè)窗體名為Form1,第二個(gè)窗體名為Form2。在Form1窗體中添加個(gè)按鈕Command1。按鈕單擊事件的代碼為:
創(chuàng)新互聯(lián)建站成立與2013年,先為北海街道等服務(wù)建站,北海街道等地企業(yè),進(jìn)行企業(yè)商務(wù)咨詢服務(wù)。為北海街道企業(yè)網(wǎng)站制作PC+手機(jī)+微官網(wǎng)三網(wǎng)同步一站式服務(wù)解決您的所有建站問(wèn)題。
Private Sub Command1_Click()
Form2.Show '用show方法加載并且顯示名為Form2的窗體
End Sub
show 方法后面省略了兩個(gè)參數(shù)即Form2.Show 0或Form2.Show 1此參數(shù)可缺省??勺孕羞\(yùn)行驗(yàn)證
兩個(gè)顯示器顯示有兩種模式,一種是
雙屏
復(fù)制,另一種是擴(kuò)展。
你這個(gè)只能用第二種方式。你需要把要在另一個(gè)顯示器上顯示的窗體的Location設(shè)置在主顯示器全屏?xí)r的右邊就可以了.其實(shí)就是桌面的向右延伸。
在主顯示上拖一下窗體就明白了!
你在窗體上加個(gè)導(dǎo)航不就行了?
顯示上一條、下一條,這樣窗體不就不變了
給你個(gè)例子
新建兩個(gè)窗體Form1,F(xiàn)orm2,每個(gè)窗體上放置一個(gè)按鈕Button1,在Form1上放置ListBox1控件
Form1的Button1的代碼如下
Private?Sub?Button1_Click(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Button1.Click
Dim?c?As?Control
For?Each?c?In?Controls
If?c.Name.Equals("ListBox1")?Then
c.Parent?=?Form2
Form2.Show()
End?If
Next
End?Sub
Form2的Button1的代碼如下
Private?Sub?Button1_Click(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Button1.Click
Dim?c?As?Control
For?Each?c?In?Controls
If?c.Name.Equals("ListBox1")?Then
c.Parent?=?Form1
Form1.Show()
End?If
Next
End?Sub
運(yùn)行界面如下
點(diǎn)擊Button1,ListBox1控件,會(huì)在兩個(gè)窗體間移動(dòng)
在項(xiàng)目中右鍵點(diǎn)擊添加窗體。在代碼中需要顯示該窗體的地方寫入如下代碼:“form2.show()”form2是你窗體的name屬性……