可以在Messagebox后面加上类似这样的代码。
With Tables("xx") .Select(.RowSel, .Cols("某列").Index)
.Focus()End If
知识点:
http://www.foxtable.com/help/topics/1436.htm
http://www.foxtable.com/help/topics/0447.htm