Visual Basic - Treeview con bases de datos

Sabe alguien si se puede llenar un Treeview con la información contenida en una base de datos, por ejemplo tener una aplicación de video club donde el nodo padre sean las categorias (drama, acción, comedia, etc), y los nodos hijos el título de la película.

Si se puede amigo, suponiendo que te conectas por medio de DAO, ejemplo:
Private Sub Form_Load()
Dim nodx As Node
Dim J As Integer
Dim dbcrono As DAO.Database
Dim ParentRS As DAO.Recordset
Dim ChildRS As DAO.Recordset
Dim Sql As String
Dim Codigo As String
tvTreeView.Nodes.Clear
Set dbcrono = OpenDatabase(App.Path & "\Peliculas.mdb")
Set ParentRS = dbcrono.OpenRecordset("select * from Categorias order by Nombre")
J = 1
Do While Not ParentRS.EOF
Codigo = ParentRS!ICodigo & "|" & ParentRS!INombre
Set nodx = tvTreeView.Nodes.Add(, , Codigo,ParentRS!Nombre) 'Aqui asignas al nodo Padre, una vez hecho ahora sus Titulos, hacemos otra consulta buscandolo por el codigo de la Categoria
Sql = "Select NombreTit From Titulos Where Codigo=" & ParentRS!Codigo
Set ChildRS= dbcrono.OpenRecordset(Sql)
Do While Not ChildRS.EOF
Set nodx = tvTreeView.Nodes.Add(Codigo, tvwChild, "Titulo" & ChildRS!NombreTit & J, ChildRS!NombreTit)
J = J + 1
ChildRS.MoveNext
Loop
ParentRS.MoveNext
Loop
tvTreeView.Refresh
ChildRS.Close
Set ChildRS = Nothing
ParentRS.Close
Set ParentRS = Nothing
dbcrono.Close
End Sub
Nota:En caso de que no puedas ejecutarlo me mandas tu Base de Datos y te lo adapto a este codigo que es lo que se pretende, saludos!!!