C# PARA VB6

EPISCOPAL 02/12/2009 17:29:30
#329007

estou com um problema no vb6 .... varri a net e achei este codigo que resolve o meu problema .... so q tá em VBnet ..... preciso traduzi-lo para vb6 ... Alguem pra me ajuda???



private static extern int SendMessage(IntPtr hwndLock,Int32 wMsg,Int32 wParam, ref Point pt);


/ / *** Obter / Change Scroll Position ***

private Point RTBScrollPos
{
get
{
const int EM_GETSCROLLPOS = 0x0400 + 221;
Point pt = new Point ();

SendMessage (this.rtbMain.Handle, EM_GETSCROLLPOS, 0, pt ref);
return pt;
}
set
{
const int EM_SETSCROLLPOS = 0x0400 + 222;

SendMessage(this.rtbMain.Handle, EM_SETSCROLLPOS, 0, ref value);
}
}