1、不可以在每一行都存储【手术亚类】的字符?这样,你直接查找到某一行,不就知道了?
2、如果要截取查找,参考代码
Dim str As String = "00.01"
Dim fdr As DataRow = DataTables("表A").Find("编码 = '" & str.substring(0,4) & "'")
3、具体你要实现什么,做个实例发上来测试