VB.Net 다른 양식에 값 전달

Question

양식의 값을 다른 양식의 공용 서브 프로그램으로 전달하는 방법을 알고 싶습니다. 문제는 "개인적이기 때문에이 맥락에서는 접근 할 수 없다"는 것입니다. "

Form 1 Private Sub를 Public Sub로 변경해 보았지만 동일한 오류가 남아 있습니다. 어떻게 작동시켜야합니까?

Public Class Form1 
Dim test(), text1 As String 
Const asd = "abcabc" 

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
    text1 = Space(LOF(1)) 
    test = Split(text1, asd) 
    HOST = test(1) 
End Sub 

그리고 당신은 매개 변수로 전달할 수 나는 또 다른 형태의

Public Class Form2 

Public Sub Check() 
    'get the value to here 
End Sub 

Answer 1

에 HOST = 시험 (1) 값을 전달하려는 :

Public Sub Check(valueToCheck as String) 
    'get the value to here 
End Sub 

또는 에 속성을 만들 form2 수신 :

private _HostOrSomething As String = "" 
Friend Property HostOrSomething As String 
    Get 
     Return _HostOrSomething 
    End Get 
    Set(ByVal value As String) 
     _HostOrSomething = value 
    End Set 

Sub Check는 로컬 var이므로 _HostOrSomething을 사용할 수 있습니다. 이것들을 사용하려면 :

HOST = Test(1) 
frm2.Check(HOST) 

또는

HOST = Test(1) 
frm2.HostOrSomething = HOST 
frm2.Check 

Answer 2

전역 클래스를 정의 할 수 있습니다 선언하는 방법 당신은 여기에 또 다른

 Dim A As New Integer= 10 

까지 하나에서 데이터를 전달하는 글로벌 변수를 사용할 수 있습니다

응용 프로그램의 어느 곳에서나 사용할 수 있습니다.

Public Class GlobalVariables 
Public Shared INTver As Integer 
End Class 

어떻게 당신이 대답을 저장하는 전역 변수를 사용하여이

GlobalVariables.INTver= A 

넣어 당신의 "쥐똥 나무 속의 식물 하위"이 라인 여기에 당신은에있는 양식의에 변수에 액세스 할 수 있습니다 WINDOWS 응용 프로그램.