Вытащить из очень очень конкретного места, встроенного в текстовый файл

Question

Я закончил каждый фрагмент кода в моей программе, за исключением одного бита, как вытащить два числа из текстового файла. Я знаю, как тянуть строки, я знаю, как тянуть строки поиска, но я не могу понять это, чтобы спасти мою жизнь.

В любом случае, вот образец автоматически сгенерированного текста, который мне нужно вытащить из ...

............................................... ........................

Использование памяти приложениями (кБ): Время работы: 6089044 В реальном времени: 6089040

** MEMINFO в pid 764 [com.lookout] **

                native   dalvik    other    total
        size:    27908     8775      N/A    36683
   allocated:     3240     4216      N/A     7456
        free:    24115     4559      N/A    28674
       (Pss):     1454     1142     6524     *9120*
(priv dirty):     1436      628     5588     *7652*

Объекты Просмотры: 0 AppContexts: 0 Активности: 0 Активы: 3 Актив Менеджеры: 3 Местные связующие: 15 прокси Связующие: 41 Получатели смерти: 3 Разъемы OpenSSL: 0

SQL куча: 98 MEMORY_USED: 98 PAGECACHE_OVERFLOW: 16 MALLOC_SIZE: 50

БАЗ pgsz dbsz Lookaside (b) Dbname 1 14 120 google_analytics.db

Распределение активов zip: /system/app/com.lookout_6.0.1_r8234_Release.apk: /resources.arsc: 161K

............................................... ..............................

Два числа, которые мне нужны из этого - это те, которые я положил в ** (звездочек там обычно нет). Эти номера будут отличаться при каждом создании этого листа, и размещение номеров может отличаться, так как некоторые номера могут иметь 4 цифры, 5 цифр или 6 цифр.

Если бы кто-нибудь мог пролить свет на этот предмет, то был бы очень признателен

Спасибо, Zach

Answer 1

Вам просто нужно прочитать последнее слово в строке и преобразовать его в число.Используйте String.LastIndexOf, чтобы найти последний пробел "" в файле и прочитать данные с этой точки вперед.

Dim line as String = "       (Pss):     1454     1142     6524     9120"
Dim value as Integer

If line.IndexOf("(Pss)") > 0 Then
    value = CInt(line.Substring(line.LastIndexOf(" ") + 1))
End If