Игнорировать закомментированные строки при считывании .txt - VB

Узнай цену своей работы

Формулировка задачи:

Добрый вечер господа. Намедни начал изучать бейсик. Проблема сабж. Нужно написать код, который будет считывать исколючительно параметры из текстового файла. Образец файла прилагается. Помогите пжлст, а то читал всякие мануалы, а там только описано

Line Input

и

Input

. Только большая просьба комментировать, надо разобраться и самому ведь
// Module : Advert // // Desc : Adverts can be used in game using this module in conjuction with the // // ***************************************************************************** // Adverts 1 = on, 0 = off show_adverts 1 // Time between adverts displayed time_between_adverts 115 // to lose say half points for dying set this to "0.5" etc stats_points "1.0"
Вобщем надо считать в переменные числовые значения 115 и символьные "1.0" без остального мусора. Пробелы между строк не критично. Надеюсь на помощь и снисходительность, если такая задача слишком простая

Решение задачи: «Игнорировать закомментированные строки при считывании .txt»

textual
Листинг программы
str=... прочитали строку
if instr(str, "//") > 0 then
  str=left(" " & str, instr(str, "//")
  str=trim(str)
  if len(str) > 0 then 'а еще лучше >2
    tmparr=split(str, " ", 2)
    par=tmparr(0) 'параметр
    value=tmparr(1) 'значение
  end if
end if

Оцени полезность:

9   голосов , оценка 4.333 из 5
Похожие ответы