到Detail_Format事件中写,比如让这四个分别等于前面的四个*2:Private sub Detail_Format()
txtField7.text = txtField1.text * 2
txtField8.text = txtField2.text * 2
txtField9.text = txtField3.text * 2
txtField10.text = txtField4.text * 2
end sub