dim conn as sqlconnection dim cmd as sqldataadapter conn = new sqlconnection(connstr) cmd = new sqldataadapter( "select * from " & table, connstr ) dim ds as dataset = new dataset() cmd.fill(ds, table) createdataview = new dataview(ds.tables(table)) end function