I'm using the TextBox control from the "Microsoft Forms 2.0" designer(because it can be transparent) and i want to be able to press for instance a command button and have the textbox scroll. Well unlike normal textbox's there is no TextBox1.hwnd (like Text1.hwnd of normal ones). How do i get the hwnd of this type of textbox?
VB Code:
Const EM_LINESCROLL = &HB6 Private Declare Function SendMessage Lib "user32" Alias _ "SendMessageA" _ (ByVal hWnd As Long, _ ByVal wMsg As Integer, _ ByVal wParam As Integer, _ ByVal lParam As Long) As Long Private Sub Command1_Click() Dim lngRet As Long lngRet = SendMessage([B]TextBox1.hwnd[/B], EM_LINESCROLL, 0, 5&) End Sub
This works on a normal textbox but since the TextBox1 doesn't have a .hwnd property i have no idea how to find the .hwnd of the textbox. WELL thanks in advance!




Reply With Quote