Dim h As DataRow = DataTables("无损_检验批").SQLFind("工程编号 = '" & gcbh.Value & "' And 检验批 = '"& jyp.Value &"'")