Получение char из строки по указанному индексу в визуальной базовой
Как указано, как получить char из строки по указанному индексу в визуальном базовом? Я просматриваю Google, и они не работают:
s(index),
s.Chars(index), s,Characters(index)
Итак, как получить char по указанному индексу?
Ответ 1
Если s - ваша строка, вы можете сделать это следующим образом:
Mid(s, index, 1)
Изменить на основе комментария ниже.
Кажется, вам нужен немного другой подход, который должен быть проще. Попробуйте следующим образом:
Dim character As String 'Integer if for numbers
= ActiveDocument.Content.Text - we don't need it
character = Activedocument.Characters(index)
Ответ 2
Получение одного char из строки по указанному индексу
Dim pos As Integer
Dim outStr As String
pos = 2
Dim outStr As String
outStr = Left(Mid("abcdef", pos), 1)
outStr = "б"
Ответ 3
char = split_string_to_char(text)(index)
------
Function split_string_to_char(text) As String()
Dim chars() As String
For char_count = 1 To Len(text)
ReDim Preserve chars(char_count - 1)
chars(char_count - 1) = Mid(text, char_count, 1)
Next
split_string_to_char = chars
End Function