Visual Basic définir une variable globale rendant mon code DRY

Question

Comment optimiser mon code en l'approchant DRY. Je veux faire ma variable d'être sur si public/général je peux réutiliser

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 

Je veux déplacer les variables (Product1, produit2) à un autre endroit que je peux mettre l'un de temps et facilement accès avec un autre contrôle. Ce que j'ai fait avant, c'est que j'ai toujours défini les variables pour chaque contrôle.

Veuillez nous consulter.

Merci!

Answer 1

Je ne suis pas sûr d'avoir votre question, mais vous savez que vos variables sont des variables d'instance, parce que vous travaillez dans une classe, n'est-ce pas? Vos variables "produit" doivent être des instances privées ou des propriétés publiques. Si vous utilisez les instances privées, donnez un moyen d'accéder à ces variables, dites les méthodes Getter. Sinon, la "Propriété" est très bien.

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