'Exkod hämta ett datatable
Dim dt as datatable = clsDataAccess.GetDataTable("select * from tabell")
'Testa om ett visst villkor är uppfyllt
If GetScalarResult("select villkorskolumn from tabell where id = " & min_id_variabel) Then
'Mitt villkor är uppfyllt!
Endif