'Send a line of chat to AOL 3

Sub AOLSend(Txt)
    room% = AOLFindRoom()
    Call AOLSetText(FindChildByClass(room%, "_AOL_Edit"), Txt)


    DoEvents
        Call SendCharNum(FindChildByClass(room%, "_AOL_Edit"), 13)
End Sub