Dim cmd As New SQLCommandDim dt As DataTableDim lst As WinForm.Table = e.Form.Controls("Table1")If lst.Table.Cols.Count>=0 Then cmd.CommandText = "Delete Fro m {Users} Where [yhbm] = '" & Useryhbm & "'" cmd.ExecuteNonQueryEnd Ifcmd.CommandText = "SELECT * Fro m {Users}"dt = cmd.ExecuteReader()Dim bd1 As New GroupTableBuilder("统计表1", dt)bd1.Groups.AddDef("yhbm","用户信息_用户账号") '根据根据用户账号分组bd1.Groups.AddDef("name","用户信息_用户姓名") '根据用户姓名分组bd1.Groups.AddDef("dwmc","用户信息_所属部门") '根据所属部门分组bd1.Groups.AddDef("group","用户信息_用户角色") '根据用户角色分组Tables("用户管理_Table1").DataSource = bd1.BuildDataSource()Tables("用户管理_table1").AutoSizeCols() '设置自动列宽
请问老师,这段代码是删除功能用的,它需要删除通过GroupTableBuilder生成的副本("用户管理_Table1")点击行删除,但是不知道怎么定义才能实现这个功能。这个副本在打开窗口的时候就已经存在,使用代码生成的,不是在table控件的属性里面设置的。属性的副本是false.