傳遞簡單的整數到Form1窗體2從

Question

只是想弄清楚如何通過一個簡單的整數從窗體2（StartingTeam），形成1

表2編號

Public Class frmTeamChoose 
Public StartingTeam As Integer 
Public Sub btnTeam1_Click(sender As Object, e As EventArgs) Handles btnTeam1.Click 
    StartingTeam = 1 
End Sub 

Public Sub btnTeam2_Click(sender As Object, e As EventArgs) Handles btnTeam2.Click 
    StartingTeam = 2 
End Sub 

End Class 

形式1的稱爲Form1上

Answer 1

雖然你需要提供更多的信息，我會盡力幫助你：
我想你已經打開窗體2從Form1中：

'In form1: 
Dim k as integer=Form2.StartingTeam 

的改進方案是創建一個屬性：
表2代碼：

Private miStartingTeam 
Public Property StartingTeam As Integer 
    Get 
     Return miStartingTeam 
    End Get 
    Set(ByVal value As Integer) 
     miStartingTeam = value 
    End Set 
End Property 

然後你的代碼，因爲它是。
在Form1：

'Open Form2 
Dim f2 as new Form2 
'f2.StartingTeam=1 'if you want to set a value before f2 opening 
f2.Show 


'Get StartingTeam from f2 
dim k as integer=f2.StartingTeam 

讓我知道，如果你有什麼事