Dim dr As DataRowdr = DataTables("test").Find(" 科目名称= '" & dr("科目名称").split("_")(0)&"_招商银行"& "' )不知道这样的行不行呀?