Sub btn_sendMessage_Click
messageref.Initialize("messages", roomref.Child(childOftheOnlyRoom & "/messages") ,"message")
Dim messagesitems As Map = CreateMap("senderId": auth.CurrentUser.Uid, "text": "Test Message 1")
messageref.push.setValue(messagesitems,"rooms","messages")
End Sub