主题：这是错在哪？判断代码问题求指点！！！！！！

 哪个窗口，怎样操作，哪里出问题

你可以试试，清楚“审核合格表”里的数据，只留“报名登记表”的，这个时候“报名登记表”里应该有“合格的和不合格的人”，但你要作查询就会有我所说的问题！

“报名审核”按钮点一下，窗口打开后，你试试清空“审核登记表”的数据，这个时候你再查询一下“报名登记表”的数据，“工作单位什么的都是空值”，没得选，而且“审核合格表”里就算有数据，我要是想点“是否合格”框选FLASE表没反应，但选“TRUE”就会有反应

    

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

点击浏览该文件:鉴定管理系统v1.rar

应该是正常了，我再导入些数据试试，版主，具体是哪方面代码不对，能指导一下吗？

1、看Afterload代码

 

2、看控件的Enter事件代码

 

3、看TabControl1的SelectedIndexChanged代码

 

4、看是否合格的自定义项，你单词写错了False

明白了，我是没有把页面集合的具体选择哪个页面写代码，还有控件涉及到选择页面的代码都没写，难怪会运行不稳定，时有时没有。谢谢版主！

Dim dlg As New OpenFileDialog
dlg.Filter = "Excel文件|*.xls"
dlg.MultiSelect = True '允许选择多个文件
If dlg.ShowDialog =DialogResult.OK Then
    For Each fl As String In dlg.FileNames
        Dim Book As New XLS.Book(fl)
        Dim mg As New Merger
        mg.SourcePath = fl
        mg.Format = "Excel"
        mg.SourceTableName = Book.Sheets(0).Name & "$"
        Select e.Form.Controls("TabControl1").SelectedPage.Text
            Case "报名登记表"
                mg.DataTableName = "报名登记表"
                mg.Merge()
            Case "审核合格表"
                mg.DataTableName = "审核合格表"
                mg.Merge()
               
        End Select
    Next
End If

 

版主，上述代码是通过对您写的代码消化理解写的“导入”按钮的CLICK事件代码，另外我把其它几个按钮都重写了代码作为公用按钮，试验了功能是有了，但发现“报名登记表”的“是否合格”列在导入数据后不会自动判断了，是不是这个事件代码影响了？其它的代码我都没动，请指教。

几个按钮的位置是在分区面板的一个区，2个表是在另1个区，会不会是这个位置的原因影响了？

 导入数据之后，重置列，重新计算

 

With DataTables("报名登记表")
    .DataCols("原技术资格等级").RaiseDataColChanged()
End With