模式的话,要这样写了,把这句写到afterload事件
Forms("多行文本框").Controls("TextBox看起来舒服").Text = e.Table.Text
改成
e.Form.Controls("TextBox看起来舒服").Text = CurrentTable(CurrentTable.TopRow, CurrentTable.LeftCol)