| |
Подсчитать количество определенных символов в тексте |
|
| |
Данный пример покажет, сколько раз встречается буква Н в данном выражении. Вместо Н вы можете использовать любое строковое выражение
Private Sub Form_Load()
myString = "в данном примере несколько букв н, а
точнее - "
tempString = Split(myString, "н")
MsgBox "в данном примере несколько букв н, а
точнее - " & UBound(tempString)
tempString = Split(myString, "нн")
MsgBox "в данном примере " & UBound(tempString) & "
раз встречается выражение нн"
End Sub
|
|
| |
|
|
|
|