Visual Basic設置一個全局變量，使我的代碼DRY

Question

如何優化我的代碼使其成爲DRY方法。我要讓我的變量是對公共/一般這樣我就可以重新使用它

Public Class BasicForm 

Dim Product1, Product2, Product3, As Integer 
Dim firstName, lastName As String 

Private Sub btn_getValue_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_getValue.Click 


    'Set variables' 
    Product1 = Val(tx_productfield1.Text) 
    Product2 = Val(tx_productfield2.Text) 
    Product3 = Val(tx_productfield3.Text) 


    'Calculate' 
    tx_totalValue.Text = Product1 + Product2 + Product3 


End Sub End Class 

我想移動的變量（產品1，產品2）到別的地方，我可以將它設置一個時間，輕鬆地訪問它與其他控制。我之前做的是我總是將變量設置爲每個控件。

請指教。

謝謝！

Answer 1

我不知道我得到了你的問題，但你知道你的變量是實例變量，因爲你正在上課，對吧？

您的「產品」變量應該是私有實例或公共屬性。如果您使用私有實例，請給出一種訪問這些變量的方法，比如Getter方法。否則，「財產」就好了。

Public Class BasicForm 

    Public Function getProduct1() As Integer 
     return Product1 
    End Function 

    '... other getters here 


    Private Product1 As Integer 
    Private Product2 As Integer 
    Private Product3 As Integer 
End Class