Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут
закрыты.
Читайте
требования к создаваемым темам.
-
Saturn.65
-
- Постоялец
-
-
- Сообщения: 543
- Зарегистрирован: 13.10.2006 (Пт) 18:46
-
Saturn.65 » 08.07.2009 (Ср) 10:57
Можно ли добавить на этом примере текст из Тектовый файл.txt в Combo1?
- Код: Выделить всё
Open App.Path & "\Тектовый файл.txt" For Input As 1
Do Until EOF(1)
Input #1, Collumn1
'Заносим инормацию из Collumn1 в LF - это колонка "меню"
Set LF = ListView1.ListItems.Add(, , Collumn1)
Loop
Close
Или как вообще добавить информацию из текстового лог файла, где только числа?
Главное, ребята, сердцем не стареть...
-
alibek
-
- Большой Человек
-
-
- Сообщения: 14205
- Зарегистрирован: 19.04.2002 (Пт) 11:40
- Откуда: Russia
alibek » 08.07.2009 (Ср) 11:05
Line Input
Lasciate ogni speranza, voi ch'entrate.
-
Saturn.65
-
- Постоялец
-
-
- Сообщения: 543
- Зарегистрирован: 13.10.2006 (Пт) 18:46
-
Saturn.65 » 08.07.2009 (Ср) 11:33
alibek писал(а):Line Input
А как ее применить?
Главное, ребята, сердцем не стареть...
-
JohnK
-
- Постоялец
-
-
- Сообщения: 874
- Зарегистрирован: 03.08.2002 (Сб) 0:35
- Откуда: 48.02` 37.58`
-
JohnK » 08.07.2009 (Ср) 12:32
- Код: Выделить всё
Line input #1, tmpStr
SELECT * FROM girls WHERE tits NOT NULL AND age BETWEEN 18 AND 25 ORDER BY Beauty
-
Saturn.65
-
- Постоялец
-
-
- Сообщения: 543
- Зарегистрирован: 13.10.2006 (Пт) 18:46
-
Saturn.65 » 08.07.2009 (Ср) 12:58
Ну а дальше то как? Вот так вроде работает.
- Код: Выделить всё
Open App.Path & "\1.txt" For Input As 1
Do Until EOF(1)
Line Input #1, tmpStr
Combo1.AddItem tmpStr
Loop
Close
Close
Последний раз редактировалось
Saturn.65 08.07.2009 (Ср) 13:05, всего редактировалось 2 раз(а).
Главное, ребята, сердцем не стареть...
-
alibek
-
- Большой Человек
-
-
- Сообщения: 14205
- Зарегистрирован: 19.04.2002 (Пт) 11:40
- Откуда: Russia
alibek » 08.07.2009 (Ср) 12:59
А ты думать совсем не хочешь?
Lasciate ogni speranza, voi ch'entrate.
-
JohnK
-
- Постоялец
-
-
- Сообщения: 874
- Зарегистрирован: 03.08.2002 (Сб) 0:35
- Откуда: 48.02` 37.58`
-
JohnK » 08.07.2009 (Ср) 13:07
А как ее применить?
Думать нужно, или за тебя все писать нужно? И вообще, такие вопросы (применение и декларация) есть в гугле в избытке!
SELECT * FROM girls WHERE tits NOT NULL AND age BETWEEN 18 AND 25 ORDER BY Beauty
Вернуться в Visual Basic 1–6
Кто сейчас на конференции
Сейчас этот форум просматривают: AhrefsBot, Majestic-12 [Bot], Yandex-бот и гости: 51