As the title..
Does any one know how to find how many specific character in a text?
Try This :
Text1 is filled by any text or words
Text2 is filled by char to find.
Private Sub Command1_Click() Dim CharCount, i As Integer CharCount = 0 For i = 0 To Len(Text1.Text) Text1.SetFocus Text1.SelStart = i Text1.SelLength = 1 If Text1.SelText = Text2.Text Then CharCount = CharCount + 1 sesuai End If Next MsgBox "You have " & CharCount & " Character " & Text2.Text End Sub
Working like a charm..
Thank you for helping sir.
Also this thread already solved.
Thanks once again.