Сэмплирование StringName.SubString (p, 1) для символа форматирования абзаца

Question

попробуйте ответить на мой вопрос, а не предлагать альтернативные подходы, поскольку у меня есть очень специфическая проблема, которая нуждается в этом специальном решении. Большое спасибо.

Автоматически мой код открывает Word через VB.NET, открывает документ, находит таблицу, переходит в ячейку, перемещает этот cell.range.text в переменную String и в цикле For сравнивает символ в позиции p до Строка.

Я попытался Струны: "^ р", "^ 013", "U + 00B6"

Мой код:

Dim nextString As String 

    'For each cell, extract the cell's text. 
    For p = 17 To word_Rng.Cells.Count 
     nextString = word_Rng.Cells(p).Range.Text 
     'For each text, search for structure. 
     For q = 0 To nextString.Length - 1 
      If (nextString.Substring(q, 1) = "U+00B6") Then 
       Exit For 
      End If 
     Next 
    Next 

ли структурные потери данных при назначении клеток текст в переменную String. Я давно искал такие форматы, как это в VBA.

Answer 1

Предполагая, что ваша строка содержит символ, вы можете использовать ChrW создать соответствующий символ из шестнадцатеричного значения, и проверьте, что:

If nextString.Substring(q, 1) = ChrW(&h00B6) Then 
    Exit For 
End If 

UPDATE

Вот полный пример:

Dim nextString = "This is a test " & ChrW(&H00B6) & " for that char" 
Console.WriteLine(nextString) 

For q = 0 To nextString.Length - 1 
    If nextString(q) = ChrW(&H00B6) Then 
     Console.WriteLine("Found it: {0}", q) 
    End If 
Next 

В этом выходы:

 
This is a test ¶ for that char 
Found it: 15