Построчное удаление из Ricktextbox (textbox) - VB
Формулировка задачи:
Здрайвствуйте!
Имеется ини-файл форма, ричтексбокс и две кнопки "начать" и "далее"
Ини-файл с какими-то значениями
Загрузку данных с файла я организовал. А вот как сделать чтобы при нажатии на кнопку "далее" в ричтексбоксе верхняя надпись убиралась, а остальные поднимались наверх. То есть При старте были все записи (1-10), при нажатии (2-10), при нажатии (3-10)......в конце (10).
Заранее спасибо!
Листинг программы
- [vos]
- 1=авп
- 2=рыоа
- 3=ывроыт
- 4=ыврв
- 5=вар
- 6=вара
- 7=вар
- 8=арв
- 9=вар
- 10=вапр
Решение задачи: «Построчное удаление из Ricktextbox (textbox)»
textual
Листинг программы
- Private Sub Command1_Click()
- On Error Resume Next
- If List1.Text = "" Then MsgBox "Нет данных для удаления!", vbCritical: Exit Sub
- List1.RemoveItem (List1.ListIndex)
- List1.Selected(0) = True
- End Sub
- Private Sub Form_Load()
- List1.AddItem "Иванов"
- List1.AddItem "Петров"
- List1.AddItem "Сидоров"
- List1.AddItem "Козлов"
- List1.Selected(0) = True
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д