sum...textbox....
1 отговора
0 прегледа
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. Благодаря

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 на
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
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