Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: как использовть filelistbox и richtextbox? Добавлено: 07.06.09 19:10  

Автор вопроса:  Trey
1)
как сделать чтобы по клику на рассказ из списка, он(рассказ, rtf документ) открывался в элементе RichTextBox который находится с права от этого элемента в той же форме?
+[fileltbox]+----[RichTextBox]------+
|1 рассказ|text text text text text|
|2 рассказ|text text text text text|
|3 рассказ|text text text text text|
|4 рассказ|text text text text text|
|5 рассказ|text text text text text|
|6 рассказ|text text text text text|
+----------+------------------------+

2) как сделать чтобы при запуске программы filelistbox открывал только папку data в папке где находится программа и видел только rtf документы без расширения?

Ответить

  Ответы Всего ответов: 12  

Номер ответа: 1
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
 Web-сайт: winandfx.narod.ru
 Профиль | | #1
Добавлено: 07.06.09 20:42
1)
  1. Private Sub File1_Click()
  2. RichTextBox1.LoadFile File1.List(File1.ListIndex)
  3. End Sub

2)
  1. File1.Path = App.Path & "\data"
  2. File1.Pattern = "*.rtf"

Ответить

Номер ответа: 2
Автор ответа:
 Trey



Вопросов: 13
Ответов: 45
 Профиль | | #2 Добавлено: 07.06.09 21:16
как можно скрыть расширения в имени файла и упорядочить, чтобы порядок был не:
1
11
2
а так:
1
2
11

Ответить

Номер ответа: 3
Автор ответа:
 Arvitaly



ICQ: 301746136 

Вопросов: 28
Ответов: 549
 Web-сайт: okazani.ru
 Профиль | | #3
Добавлено: 07.06.09 21:25
а так:
1
2
11

Думаю стандартными средствами никак

Ответить

Номер ответа: 4
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
 Web-сайт: winandfx.narod.ru
 Профиль | | #4
Добавлено: 07.06.09 22:07
заюзать параллельно файл-боксу лист-бокс, в котором как хочешь так и делай

Ответить

Номер ответа: 5
Автор ответа:
 Trey



Вопросов: 13
Ответов: 45
 Профиль | | #5 Добавлено: 07.06.09 22:35
а как можно сделать так чтобы в filebox отображался список файлов из каталога?

Ответить

Номер ответа: 6
Автор ответа:
 Trey



Вопросов: 13
Ответов: 45
 Профиль | | #6 Добавлено: 07.06.09 22:35
тоесть в listbox

Ответить

Номер ответа: 7
Автор ответа:
 Trey



Вопросов: 13
Ответов: 45
 Профиль | | #7 Добавлено: 07.06.09 22:48
Private Sub File1_Click()
RichTextBox1.LoadFile File1.List(File1.ListIndex)
End Sub


как правильно прописать путь до папки data? все способы перебробовал и вылазить ошибка not file foud, нормально открывает только файлы которые лежат в каталоге с программой

Ответить

Номер ответа: 8
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
 Web-сайт: winandfx.narod.ru
 Профиль | | #8
Добавлено: 07.06.09 23:17
Trey, наверное File1.Path & File1.List(File1.ListIndex)
или File1.Path & "\" & File1.List(File1.ListIndex)

Ответить

Номер ответа: 9
Автор ответа:
 Trey



Вопросов: 13
Ответов: 45
 Профиль | | #9 Добавлено: 08.06.09 08:22
большое спасибо!

Может есть какая идея
Arvitaly пишет:
а так:
1
2
11

Думаю стандартными средствами никак


жалко, а может есть возможность хотябы скрыть расширения файла?

Ответить

Номер ответа: 10
Автор ответа:
 Trey



Вопросов: 13
Ответов: 45
 Профиль | | #10 Добавлено: 08.06.09 09:24
порылся в нете, нашел функцию ExtractFileName('FileName') как его приминить не понял

Ответить

Номер ответа: 11
Автор ответа:
 Arvitaly



ICQ: 301746136 

Вопросов: 28
Ответов: 549
 Web-сайт: okazani.ru
 Профиль | | #11
Добавлено: 08.06.09 11:49
Никак эта функция не имеет к этому элементу (FileListBox) никакого отношения - используя функцию Dir в цикле засунь все файлы в ListBox, с каким нужно тебе расширением и именами

Ответить

Номер ответа: 12
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
 Web-сайт: winandfx.narod.ru
 Профиль | | #12
Добавлено: 08.06.09 17:45
  1. Dim str As String
  2. str = "qwet.so.1"
  3. Mid$(str, 1, InStr(1, str, ".") - 1)

получаешь всё до первой точки

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам