I'm only a beginner programmer, and I don't know all that much. I'm using Visual Basic 6.0, and I need a way to get the text from a chatroom in mIRC and place it into a textbox. I'm having a hard time with this; the best I can do is get the caption of the chatroom added to the textbox. If you feel like looking over my code, here you are:

===================CODE START===================
Private Sub Command5_Click()
Chat$ = mircchatline
Text14 = Chat$
End Sub
===================
Public Function mircchatline() As String
Dim lngmirc As Long, lngmdi As Long, lngchannel As Long
Let lngmirc& = FindWindow("mirc32", vbNullString)
Let lngmdi& = FindWindowEx(lngmirc&, 0&, "mdiclient", vbNullString)
Let lngchannel& = FindWindowEx(lngmdi&, 0&, "channel", vbNullString)
Let mircchatline$ = gettext(lngchannel&)
End Function
===================
Public Function gettext(lngwindow As Long) As String
Dim strbuffer As String, lngtextlen As Long
Let lngtextlen& = SendMessage(lngwindow&, WM_GETTEXTLENGTH, 0&, 0&)
Let strbuffer$ = String(lngtextlen&, 0&)
Call SendMessageByString(lngwindow&, WM_GETTEXT, lngtextlen& + 1&, strbuffer$)
Let gettext$ = strbuffer$
End Function
===================CODE END===================

If you've made it this far, I appreciate it. Any help would be terrific.

Thanks,

- Jason