直接赋值不就行了?
xxx = "审核: " & Forms("窗口1").Controls("TextBox1").Text
http://www.foxtable.com/help/topics/1391.htm