Поиск в TextBox VB6 - VB

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

В тексте загруженном в TextBox нужно найти все слова, которые начинаются с большой буквы. В интернете не нашел примеров, а то что сам склипал работает не правильно. Помогите пожалуйста.
Private Sub Command9_Click() 
  Dim st As String 
  st = Text1.Text 
  If InStr(1, st, vbProperCase, vbTextCompare) Then 
    MsgBox "Слова: " & st 
  End If 
End Sub

Код к задаче: «Поиск в TextBox VB6 - VB»

textual
if(Ucase(Q)=Q) Список1.AddItem S(J)
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.

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


СДЕЛАЙТЕ РЕПОСТ