в таблице MSFlexGrid необходимо найти определённое значение которое прописывается в TextBox , при нахождении этого значения в таблице должна выделиться строка с этим значением .
Я делаю так:
Public Sub findname()
Dim v As Integer
Dim findstr As String
Dim findstr1 As String 'значение которое необходимо найти
findstr1 = Text9.Text
'перебераю таблицу в поиске значения
For v = MSFlexGrid1.FixedRows To MSFlexGrid1.Rows - 1
findstr = MSFlexGrid1.TextMatrix(v, 0) 'присваиваю переменной текущее значение, для сравнения с искомым значением
If findstr = findstr1 Then
MSFlexGrid1.TopRow = v
' после нахождения значения найденную строку надо выделить, как это сделать ?
Exit Sub
End If
Next
End Sub
и ещё вопрос , как мне искать строку по шаблону, например что бы при вводе в текст бокс " пример" , в таблице нашлась строка с содержимым "пример поиска "
делать так:
findstr1 = Text9.Text & "*"
такой вариант не проходит ...
