by Caligula on Wed May 04, 2011 7:40 pm
Private Sub TextBox1_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
Dim a, b, c, d, e, f, g, h, i, j, l, m As Single
a = Form3.TextBox1.Text
b = a * 10
c = a * 100
d = a * 1000
e = a * 10000
f = a * 100000
g = a * 1000000
h = a * 24.5
i = h / 12
j = i / 3
l = j / 1760
m = l / 3
Form3.TextBox2.Text = b
Form3.TextBox7.Text = c
Form3.TextBox6.Text = d
Form3.TextBox5.Text = e
Form3.TextBox4.Text = f
Form3.TextBox3.Text = g
Form3.TextBox10.Text = h
Form3.TextBox11.Text = i
Form3.TextBox12.Text = j
Form3.TextBox9.Text = l
Form3.TextBox8.Text = m
end sub
Private Sub TextBox10_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox10.TextChanged
Dim a, b, c, d, e, f, g, h, i, j, l, m As Single
a = h / 24.5
b = a * 10
c = a * 100
d = a * 1000
e = a * 10000
f = a * 100000
g = a * 1000000
h = Form3.TextBox10.Text
i = h / 12
j = i / 3
l = j / 1760
m = l / 3
Form3.TextBox2.Text = b
Form3.TextBox7.Text = c
Form3.TextBox6.Text = d
Form3.TextBox5.Text = e
Form3.TextBox4.Text = f
Form3.TextBox3.Text = g
Form3.TextBox1.Text = a
Form3.TextBox11.Text = i
Form3.TextBox12.Text = j
Form3.TextBox9.Text = l
Form3.TextBox8.Text = f
end sub
what i want is if textbox1 text changes then textbox2 textchange command is ignored and vice-versa