Witam.
Mam taki kod na wyszukiwanie tekstu (we wszystkich zakładkach aplikacji), niestety on szuka "identycznego tekstu" , a chciałbym by on wyszukiwał tekst bez względu na to czy jest napisany z małej literki, czy z dużej...
np "Witam" lub "WiTaM" czy "wiTAM" to i tak ma znaleźć słowo "witam".
Co muszę dodać w tym kodzie ?
Dim SearchText As String = TextBox1.Text
Dim ctrl, ctrl2 As Control
For Each ctrl In TabControl1.Controls
If TypeOf (ctrl) Is TabPage Then
Dim page As TabPage = ctrl
For Each ctrl2 In page.Controls
If TypeOf (ctrl2) Is RichTextBox Then
Dim box As RichTextBox = ctrl2
Dim pos As Integer = box.Text.IndexOf(SearchText)
If (pos >= 0) Then
box.SelectionStart = pos
box.SelectionLength = SearchText.Length
TabControl1.SelectedTab = box.Parent
box.SelectionColor = Color.Red
box.SelectionFont = New Font(box.Font, FontStyle.Bold)
box.Focus()
Exit Sub
End If
End If
Next
End If
Next