在窗口初始化事件的时候，用代码给text控件赋值，然后在将控件的值赋值给变量。现在想实现在程序运行的过程中，当控件的值改变时，变量的值跟随改变，应该怎么做呀？知道的朋友麻烦指导下，谢谢
    Form2.Text1.Text = 6.2
    Form2.Text2.Text = 4.145
    Form2.Text3.Text = 2.6
    Form2.Text4.Text = 0.6
    Form2.Text5.Text = 0.1333
    Form2.Text6.Text = 0.3
    Form2.Text7.Text = 0.25
    Form2.Text8.Text = 0.75
    Form2.Text9.Text = 0.7
    Form2.Text10.Text = 0.508
    Form2.Text11.Text = 0.0255
    Form2.Text12.Text = 33
    Form2.Text13.Text = 1800
    Form2.Text14.Text = 0.039
    Form2.Text15.Text = 36
    Form2.Text16.Text = 530
    Form2.Text17.Text = 2
    Form2.Text18.Text = (90 - 82.433) / 57.3
    Form2.Text19.Text = 13.6
    Form2.Text20.Text = 0.2
    Form2.Text21.Text = 0.85
    Form2.Text22.Text = 0.85

    Dh = Val(Form2.Text1.Text): hg = Val(Form2.Text2.Text)
    L0 = Val(Form2.Text3.Text): e = Val(Form2.Text4.Text)
    w = Val(Form2.Text5.Text): u = Val(Form2.Text6.Text)
    h1 = Val(Form2.Text7.Text): Df = Val(Form2.Text8.Text)
    K1 = Val(Form2.Text9.Text): K2 = Val(Form2.Text10.Text)
    dk = Val(Form2.Text11.Text): angleK = Val(Form2.Text12.Text)
    densityK = Val(Form2.Text13.Text): dj = Val(Form2.Text14.Text)
    angleJ = Val(Form2.Text15.Text): densityJ = Val(Form2.Text16.Text)
    Hh = Val(Form2.Text17.Text): angleL = Val(Form2.Text18.Text)
    HS = Val(Form2.Text19.Text): K3 = Val(Form2.Text20.Text)
    K4 = Val(Form2.Text21.Text): K5 = Val(Form2.Text22.Text)