主题：关于RecordGrid控件绑定数据

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:显示隐藏列 (1).table

甜老师还如果打开窗体后在没有选择列的情况下，单击向下按钮会弹出同样错误，向上按钮没问题

Dim clist As WinForm.CheckedListBox = e.Form.Controls("CheckedListBox1")
Dim i = clist.SelectedIndex
If i > -1 AndAlso i < clist.Items.count-1
    Dim s1 = clist.Items(i)
    Dim s2 = clist.Items(i+1)
    Dim c1 = clist.GetItemChecked(i)
    Dim c2 = clist.GetItemChecked(i+1)
    clist.Items(i) = s2
    clist.Items(i+1) = s1
    clist.SetItemChecked(i, c2)
    clist.SetItemChecked(i+1, c1)
    clist.SelectedIndex = i+1
   
    e.Form.controls("button1").performclick
End If

甜老师和Syscmd.Column.MoveLeft()不一样，上面的代码会把原始数据列的顺序给改了，重新启动程序也回复不了以前的数据列的顺序了。

 

把原来项目的代码删除->AfterOpenProject、beforeCloseProject等等，表格也删除

不明白您的意思

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:显示隐藏列 (1) (1).table

（1）e.Form.controls("button1").performclick  这句代码什么意思呢？

 

 

 

（2）怎么实现当选中CheckedListBox控件中列时，同时实现窗体表的列呢？也就是说二者同步

1、http://www.foxtable.com/webhelp/scr/2309.htm

 

2、

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:显示隐藏列 (1) (1).table

程序打开后提醒窗体被打开单击导出数据弹出错误，代码中也没执行主窗口的代码呀，怎么会报主窗口的错误呢？