主题：任务栏绑定表这个哪里是错误的？

Select Case e.Link.Name
    Case "合同"
         MainTable = Tables("合同")
     Case "订单"
         MainTable = Tables("订单")
End Select

代码没有错，错在你急于求成。

建议你先按顺序看帮助，从《使用指南》开始看，看两遍，会用了，再看《开发指南》。