主题：[求助]添加菜单

置前，置后，参考

 

e.form.Controls("Table1").basecontrol.BringToFront '置前

 

e.form.Controls("Table1").basecontrol.SendToBack  '置后

贴出你写的代码

 

 

加上代码

 

Striptab1.basecontrol.BringToFront

 

不会做上传实例测试。

按照你生成的顺序显示的。如果要倒过来，请修改你控件生成的次序。

 

或者生成以后，再倒过来的顺序设置。

比如这样

 

For Each dc As DataCol In dt.DataCols

 

改成这样

 

For i As Integer = 0 To dt.DataCols.count-1
    Dim dc As DataCol = dt.datacols(i)
Next

 

或者这样

 

For i As Integer = dt.DataCols.count-1 to 0 step -1
    Dim dc As DataCol = dt.datacols(i)
Next