Visual Basic设置一个全局变量使我的代码DRY

时间:2010-08-03 11:40:24

标签: vb.net visual-studio-2010

如何优化我的代码,使其成为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

我想将变量(product1,product2)移动到我可以设置一次的其他位置,并使用其他控件轻松访问它。我之前做的是我总是将变量设置为每个控件。

请建议。

谢谢!

1 个答案:

答案 0 :(得分:0)

我不确定我是否收到了您的问题,但您知道您的变量是实例变量,因为您在课堂上工作,对吧?

您的“产品”变量应该是私有实例或公共属性。如果您使用私有实例,请提供一种访问这些变量的方法,比如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