[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
Страница 1 из 11
Форум » Наш сайт » Visual basic » Определение количества строк в TextBox'е (Определение количества строк в TextBox'е)
Определение количества строк в TextBox'е
ilimДата: Среда, 09.11.2011, 22:28 | Сообщение # 1
Генералиссимус
Группа: Администраторы
Сообщений: 680
Награды: 17
Репутация: 4
Статус: Offline
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

Private Sub Text1_Click()
Dim LineCount As Integer
LineCount = SendMessage(Text1.hwnd, EM_GETLINECOUNT, 0&, 0&)
MsgBox LineCount
End Sub


www.ilim.kz
 
Форум » Наш сайт » Visual basic » Определение количества строк в TextBox'е (Определение количества строк в TextBox'е)
Страница 1 из 11
Поиск: