Excel VBA Userform Как складывать и вычитать переменные?
У меня есть пользовательская форма, на странице 1 пользовательской формы пользователь вводит некоторый текст в TextBox с именем as_1, а другой TextBox - с именем yearsaving1.
На странице 5 пользовательской формы я хотел бы добавить обе переменные в текстовое поле под названием "TextBox36". Это код, который я использовал:
Private Sub Page5a()
I = as_1 + annualsaving1
TextBox36.Value = I
End Sub
Когда я использую этот код, появляется только значение as_1. Это не добавляет 'yearsaving1'.
Любая помощь будет оценена, спасибо:)
2 ответа
Попробуйте ниже
Private Sub Page5a()
TextBox36.Text = Val(as_1.Text) + Val(annualsaving1.Text)
End Sub
as_1
а также annualsaving1
имеют тип TextBox
, Чтобы добавить их значения, вам нужно получить доступ к их .Value
свойство и преобразовать его в тип Integer
:
I = CInt(as_1.value) + CInt(annualsaving1.value)
Будьте осторожны: если пользователь введет что-то, что не может быть проанализировано как число, ваша программа потерпит крах.