Компонент вроде ListView и зона видимости. - VB

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

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

Всем привет! Ребята, пожалуйста, подскажите как решить одну небольшую проблемку. Я написал компонент вроде ListView, но, если поле с записью находится за пределами самого компонента, то к нему(полю) нельзя обратиться. А теперь сам вопрос. Как сделать так, чтобы при изменении значения полосы прокрутки, компонент, который находится за пределами зоны видимости получал фокус и был в зоне видимости? Всем заранее огромное спасибо!

Решение задачи: «Компонент вроде ListView и зона видимости.»

textual
Листинг программы
    If Text1(vsbRight.Value).Top + Text1(vsbRight.Value).Height > UserControl.Height Then
        For i = 0 To Text1.UBound
            Text1(i).Top = Text1(i).Top - 300
            If Text1(i).Top + Text1(i).Height < 350 Then
                Text1(i).Visible = False
            End If
        Next
    ElseIf Text1(vsbRight.Value).Top < 330 Then
        itop = 330
        For i = vsbRight.Value To Text1.UBound
            Text1(i).Top = itop
            If Text1(i).Visible = False Then Text1(i).Visible = True
            itop = itop + 300
        Next
    End If
    Text1(vsbRight.Value).SetFocus

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


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

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

6   голосов , оценка 3.667 из 5