新聞中心
VS2013 vb點虐 添加了多個窗體,可以怎么把幾個窗體分類歸放在一起嗎
可以此橘鎮(zhèn)使用數(shù)組列表(ArrayList)(數(shù)組)將同一類型的窗體存儲在同一個數(shù)組列森粗表中,伍簡引用時for each next 循環(huán)迭代
創(chuàng)新互聯(lián)建站是一家朝氣蓬勃的網(wǎng)站建設(shè)公司。公司專注于為企業(yè)提供信息化建設(shè)解決方案。從事網(wǎng)站開發(fā),網(wǎng)站制作,網(wǎng)站設(shè)計,網(wǎng)站模板,微信公眾號開發(fā),軟件開發(fā),小程序開發(fā),十余年建站對成都玻璃隔斷等多個行業(yè),擁有豐富的網(wǎng)站維護經(jīng)驗。
vb點虐 怎么同時打開多個窗口?
在項目中右鍵點擊添加窗體。在代碼中需要顯示該窗體的地方寫入如下代碼:“form2.show()”form2是你窗體的name屬性……
vb點虐 如何讓兩個窗體并發(fā)運行
Imports System.Threading
Public Class Form1
Dim t1, t2 As Thread
Dim tt1
Private Delegate Sub voiddelegate(ByVal i As Integer)
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Form2.Show()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
t1 = New Thread(AddressOf test)
tt1 = 1
t1.Start()
tt1 = 2
t2 = New Thread(AddressOf test)
t2.Start()
' Timer1.Start()
End Sub
Private Sub updateui(ByVal i As Integer)
Form2.Label1.Text = i.ToString
Form2.Label2.Text = i.ToString
End Sub
'把循環(huán)放到線程中運行會好一些,其實主要事務(wù)是對窗體控件的操作時多線程意義不大,因為訪問窗體的代碼依然要耐好在窗體線程中運行。
Private Sub test()
Dim d As voiddelegate = AddressOf updateui
For i = 0 To 9000
Me.Invoke(d, i)
Next
End Sub
'如果放在計時器中運行效果好的兄搜多
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Static i As Integer = 0
i += 1
If i 9000 Then Timer1.Stop() : i = 0
Form2.Label1.Text = i.ToString
Form2.Label2.Text = i.ToString
End Sub
End Class
'如果在另一線程中用Application.run 打開窗體確實能行,不過窗體間相互操作不起作羨畝歷用,這個尚待研究中。
分享名稱:vb點虐 窗體并列 vb兩個窗體之間怎么跳轉(zhuǎn)
鏈接URL:http://www.dlmjj.cn/article/ddpgsij.html