Try Dim i As Integer = 0 For i = 0 To RichTextBox2.Lines.Count - 1 ReturnSynonyms(RichTextBox2.Lines(0)) Next Catch ex As Exception End Try
Try...Catch
ReturnSynonyms
Dim i As Integer = 0 For i = 0 To RichTextBox2.Lines.Count - 1 Try ReturnSynonyms(RichTextBox2.Lines(0)) Catch ex As Exception End Try Next
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)