Построчное удаление из Ricktextbox (textbox) - VB

Узнай цену своей работы

Формулировка задачи:

Здрайвствуйте! Имеется ини-файл форма, ричтексбокс и две кнопки "начать" и "далее" Ини-файл с какими-то значениями
Листинг программы
  1. [vos]
  2. 1=авп
  3. 2=рыоа
  4. 3=ывроыт
  5. 4=ыврв
  6. 5=вар
  7. 6=вара
  8. 7=вар
  9. 8=арв
  10. 9=вар
  11. 10=вапр
Загрузку данных с файла я организовал. А вот как сделать чтобы при нажатии на кнопку "далее" в ричтексбоксе верхняя надпись убиралась, а остальные поднимались наверх. То есть При старте были все записи (1-10), при нажатии (2-10), при нажатии (3-10)......в конце (10). Заранее спасибо!

Решение задачи: «Построчное удаление из Ricktextbox (textbox)»

textual
Листинг программы
  1. Private Sub Command1_Click()
  2.     On Error Resume Next
  3.     If List1.Text = "" Then MsgBox "Нет данных для удаления!", vbCritical: Exit Sub
  4.     List1.RemoveItem (List1.ListIndex)
  5.     List1.Selected(0) = True
  6. End Sub
  7.  
  8. Private Sub Form_Load()
  9.     List1.AddItem "Иванов"
  10.     List1.AddItem "Петров"
  11.     List1.AddItem "Сидоров"
  12.     List1.AddItem "Козлов"
  13.     List1.Selected(0) = True
  14. End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

7   голосов , оценка 4.286 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут