cargar solo las tablas de una DB sql en un treeview vb.net

[santos_pedro]

veras DexterGlue, tengo este codigo que es para cargar las columnas de cualquier tabla de una base de datos selecionada

Dim a As New Libreria
Dim nodo As New TreeNode
Dim conn As New SqlConnection(a.Conexion())
Dim comm As New SqlDataAdapter("select * sys.tables", conn)
Dim ds As New DataSet
comm.Fill(ds, "Usuario")
Dim dt As DataTable = ds.Tables("Usuario")

'Dim dr As DataRow

For Each dr In dt.Rows

nodo = TreeView1.Nodes(0).Nodes.Add(Trim(dr("nombre")))
Next

esto me carga perfectamente las columnas de la tabla que yo quiera, pero mi problema es como cargo solo las tablas en general, sin ninguna columna, solo las tablas. tal vez solo sea de cambiar alguna linea del codigo, yo he intentado pero no me funciona, me da un error en el FILL. tal vez me puedas ayudar con el codigo o donde puedo encontrar la informacion