Número de líneas de un TextBox

Con esta llamada al API podrás conocer el número de líneas que posee un TexBox Multiline.

Estas son las declaraciones de la Función y de la Constante.

Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, _
             ByVal wParam As Long, lParam As Any) As Long
Private Const EM_GETLINECOUNT = &HBA

Esta es la llamada que te devuelve el número de línea des TextBox “Text1”.

Lineas = SendMessage(Text1.hWnd, EM_GETLINECOUNT, 0, 0&)

Publicado en es.comp.lenguajes.visual-basic por Eduardo Morcillo

Anuncios

Responder

Introduce tus datos o haz clic en un icono para iniciar sesión:

Logo de WordPress.com

Estás comentando usando tu cuenta de WordPress.com. Cerrar sesión /  Cambiar )

Google photo

Estás comentando usando tu cuenta de Google. Cerrar sesión /  Cambiar )

Imagen de Twitter

Estás comentando usando tu cuenta de Twitter. Cerrar sesión /  Cambiar )

Foto de Facebook

Estás comentando usando tu cuenta de Facebook. Cerrar sesión /  Cambiar )

Conectando a %s