Dim ls1 As List(Of String) = DataTables("GMYX").getvalues("XJHZXM", "XZMC='" & e.DataRow("乡镇") & "' and XJHZXM is not null")