Form1 Find String Demo Form15 Frame1 Direction optDirection optDirection Command2 &Pattern MList1 MListBox 04.60J Command1 &Find Text1 Label1 Type here to demo FindString: @ Form_Load MList1V Text1_Change FindString Text1 Command1_Click' FindStringExact MList1_Click MList1_KeyPress KeyAscii FindIndex Command2_Click FindPattern Form_Error Form_OkM mlItemCnt Mist1d optDirection_Click Index Click optDirection Value FindDirection Command1_Click SearchCompare is equal to Case Insensitive WASHINGTON,GEORGE FindIndex = Command2_Click A?a*,S* Form_Load Adams,Samuel Adbams,Samuel Adcams,Samuel Addams,Samuel Aladin,Sadeem Bono, Sonny Chaplin, Charlie Dawg, Deputy Washington,George Enter number of items to add FindString Demo 10000 For I = 0 To 5 This is a test string 000000 This is a testarosa 000000 MList1_KeyPress Key: optDirection_Click Text1_Change