sum...textbox....

1 отговора 0 прегледа
#1

sum...textbox....

Private Sub TextBox36_Enter()
Dim a As Single
Dim b As Single
Dim c As Single
b = CStr(TextBox14.Text)
c = CStr(TextBox11.Text)
TextBox36.Text = a
TextBox36.Value = b + c
End Sub

Кое събитие да извикам за да може стойностите въведени в TextBox14.Text и TextBox11.Text веднага да се сумират в textbox36 ?
И ако не е нахално да попитам :
Как може да стане , textbox1 който се намира в userform1 да се отпечата стойността в textbox2 който пък се намира в userform2. Благодаря

Редактирано от vector_m на

Отговор
в отговор на vector_m #2

Re: sum...textbox....

Въпрос 1
Private Sub TextBox11_Change()
TextBox36_Enter
End Sub
Private Sub TextBox14_Change()
TextBox36_Enter
End Sub

Въпрос 2
Private Sub TextBox1_Change()
UserForm2.TextBox2.Value = UserForm1.TextBox1.Value
End Sub

Отговор