Would this work?
Code:
Insert item Check height to see if the tree is balanced If it is unbalanced, call function to perform necessary swaps
Insert item Check height to see if the tree is balanced If it is unbalanced, call function to perform necessary swaps
Dim drawer As Integer
Dim Folder As Integer
Dim msg As String
Dim count As Integer
drawer = 11
Folder = 1
Dim DB As Database
Dim rst As DAO.Recordset
Set DB = CurrentDb()
Set rst = DB.OpenRecordset("tbl_Scan_Index")
Leave a comment: