Привет всем.
Кто- нибудь знает как заносить данные в колонки в ListBox'e?
Колонки
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Сообщений: 4
• Страница 1 из 1
- RayShade
- Scarmarked
-
- Сообщения: 5511
- Зарегистрирован: 02.12.2002 (Пн) 17:11
- Откуда: Russia, Saint-Petersburg
- alibek
- Большой Человек
- Сообщения: 14205
- Зарегистрирован: 19.04.2002 (Пт) 11:40
- Откуда: Russia
alibek » 14.04.2003 (Пн) 16:33
Почему никак?
Это в форму Form1
А потом это
Это в форму Form1
- Код: Выделить всё
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 LB_SetTabStops As Long = &H192&
А потом это
- Код: Выделить всё
Dim TS(0 To 2) As Long
TS(0) = 20
TS(1) = 40
TS(2) = 120
SendMessage ListBox1.hWnd, LB_SetTabStops, 3, TS(0)
Erase TS()
ListBox1.AddItem "|" & vbTab & "|" & vbTab & "|" & vbTab & "|"
ListBox1.AddItem "1" & vbTab & "2" & vbTab & "3" & vbTab & "4"
Lasciate ogni speranza, voi ch'entrate.
Спасибо
Сообщений: 4
• Страница 1 из 1
Кто сейчас на конференции
Сейчас этот форум просматривают: Google-бот, Mail.ru [бот], Yandex-бот и гости: 60