Somehow this works...
Private Contact_List = "contact_list",Phone_Number = "phone_number" As String
Private Q_UPDATE = "q_update" As String
Private Q_INSERT = "q_insert" As String
Private Q_DELETE = "q_delete" As String
Got it to work by trial and error - Little needs to done for Update, Insert, Delete queries except they become Strings as opposed to Integers (not sure why there is any difference). The Select Query seems a bit more specific but might work just as well as "Private Q_SELECT = "q_select". But, as each Select Query will then have a Name it makes it easier to populate a ListView when using more then one Query.
B4A Rocks