Forms("窗口1").Controls("A").Value = val(Forms("窗口1").Controls("textbox1").Value)* val(Forms("窗口1").Controls("A").Value)