Forms("导航").Open()
Tables("员工").Cols.Frozen = 0
MainTable = Tables("订单")
MessageBox.Show("提示:" & vbcrlf & vbcrlf & "1、请通过左侧窗口的任务栏, 选择要演示的功能。" & vbcrlf & _