Vb.net 使从函数获取的参数能够从其他子函数访问

我想访问发送到我的类中函数的参数，而不在我的类上面声明变量来表示它，我的意思是这样的

 Public Sub InitializeForm(ByVal Title As String, DocCode As String, BillNo As String)

    Me.Text = Title
    Me.txtDocCode.Text = DocCode
    Me.txtBillNo.Text = BillNo

End Sub

我想从同一个类中的这个子类访问名为“DoccCode”的变量

Private Sub SaveData
       //i want to access DocCode from here without declare another variable to be define
End sub

---

您只需声明一个

全局变量

或一个

属性

，该属性将保存该值。 但是，由于您正在将该值设置为文本框，假设该值不会更改，您可以直接从文本框读取该值，如下所示

Private Sub SaveData

       dim x as string = txtDocCode.Text
End sub

Public Class MyClass

 ' Global variable to hold the value
 Private Doc as string

 Public Sub InitializeForm(ByVal Title As String, DocCode As String, BillNo As String)

    Doc = DocCode
    Me.Text = Title
    Me.txtDocCode.Text = DocCode
    Me.txtBillNo.Text = BillNo

 End Sub

 Private Sub SaveData

   ' Doc variable will still be available 
 End sub

End Class

否则，如果该值可能会发生更改，并且您希望保留初始值，则可以按以下步骤进行操作

Private Sub SaveData

       dim x as string = txtDocCode.Text
End sub

Public Class MyClass

 ' Global variable to hold the value
 Private Doc as string

 Public Sub InitializeForm(ByVal Title As String, DocCode As String, BillNo As String)

    Doc = DocCode
    Me.Text = Title
    Me.txtDocCode.Text = DocCode
    Me.txtBillNo.Text = BillNo

 End Sub

 Private Sub SaveData

   ' Doc variable will still be available 
 End sub

End Class

---

您的第一个acvise是我期待的东西非常感谢您我开始认为该值已存储在文本框中非常感谢