Hello Folks Denna artikel kanske kan hjälpa till:API SendMessage ?
    
    
Sitter och klurar på DaPe :s  Sök problem här under i VB Nybörjare.
"SendMessageA" (ByVal hWnd As Long, _
  ByVal wMsg As Long, ByVal wParam As Long, _
  ByVal lParam As Any) As Long
  Const EM_GETLINECOUNT = &HBA
  Const EM_GETLINE = &HC4
  Const EM_FINDTEXT = &H438
Någon API Guru som vet hur man hanterar
EM_FINDTEXT i SendMessage
Dim ret As Long
ret = SendMessage(txtRTF.hWnd, EM_FINDTEXT,? , ?)
mvh
SvenSv: API SendMessage ?
    
    
http://www.vbpj.com/upload/free/features/vbpj/1999/jan99/hm0199/hm0199.asp
Referens (c):
http://msdn.microsoft.com/library/psdk/winui/richedit_6np0.htm
http://msdn.microsoft.com/library/psdk/winui/richedit_0n51.htm
/Pelle