在项目事件CurrentTableChanged中加入下面代码
If Tables(CurrentTable.Name).Current IsNot Nothing Then
Tables(CurrentTable.Name).AutoSizeRows() '自动设置各行高度
End If
窗口就打不开了