Public Sub ExecuteMaps(Sql As SQL,Query As String,StringArgs() As String,Limit As Int, PK As String) As List
Dim lstFinal As List
lstFinal.Initialize()
Dim tmpList As List = DBUtils.ExecuteList(Sql,Query,StringArgs,Limit)
For Each r In tmpList
Dim m As Map = DBUtils.Executemap(Sql,$"SELECT * FROM (${Query}) as _tmp WHERE ${PK} = ${r}"$,StringArgs)
lstFinal.Add(m)
Next
Return lstFinal
End Sub