如果序号是字符型:
dr=DataTables("表A").Find("序号='" & xuh & "'")
如果需要是数值型:
dr=DataTables("表A").Find("序号=" & xuh)