Excel VBA-Benutzerformular Wie können Variablen hinzugefügt oder entfernt werden?

Question

Ich habe ein Benutzerformular, auf Seite 1 der Benutzerform gibt der Benutzer Text in eine TextBox namens as_1 und eine andere TextBox namens juniorsaving1 ein.

Auf Seite 5 des Benutzerformulars möchte ich beide Variablen oben in Textbox namens "TextBox36" hinzufügen. Dies ist der Code, den ich verwendet haben:

Private Sub Page5a() 
I = as_1 + annualsaving1 
TextBox36.Value = I 
End Sub 

Wenn ich diesen Code verwenden, nur der Wert von as_1 erscheint. Es wird kein "Jahressatz1" hinzugefügt.

Jede Hilfe würde geschätzt, Danke :)

Answer 1

as_1 und annualsaving1 sind vom Typ TextBox. Um ihre Werte hinzuzufügen, müssen Sie ihre .Value Eigenschaft zuzugreifen und wandeln es Integer eingeben:

I = CInt(as_1.value) + CInt(annualsaving1.value) 

Vorsicht aber: wenn der Benutzer etwas eingibt, der nicht als Nummer analysiert werden kann, wird Ihr Programm zum Absturz bringen.

Answer 2

versuchen unter

Private Sub Page5a() 
    TextBox36.Text = Val(as_1.Text) + Val(annualsaving1.Text) 
End Sub