Получение 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