Visual Basic- "IF" не заканчивается

Question

If My.Computer.FileSystem.FileExists("pack/locale_ro.epk") Then My.Computer.FileSystem.DeleteFile("pack/locale_ro.epk")

    PB_GSM.Value = 10

    If My.Computer.FileSystem.FileExists("pack/locale_ro.eix") Then My.Computer.FileSystem.DeleteFile("pack/locale_ro.eix")

    PB_GSM.Value = 20

    If My.Computer.FileSystem.FileExists("pack/root.epk") Then My.Computer.FileSystem.DeleteFile("pack/root.epk")

    PB_GSM.Value = 30

    If My.Computer.FileSystem.FileExists("pack/root.eix") Then My.Computer.FileSystem.DeleteFile("pack/root.eix")

    PB_GSM.Value = 40

    My.Computer.Network.DownloadFile("http://example")

Я верю, что написал все правильно, но неважно, как я пишу "если", я не могу их закончить. если я написал End, если рядом со строкой написано что-то вроде "End if должен предшествовать соответствующий if". И еще одна проблема: строка о ссылке для скачивания подчеркнута и гласит: "Не удалось разрешить перегрузку, потому что ни один из доступных" DownloadFile "не принимает это количество аргументов".

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

Answer 1

У вас есть все в одной строке. Не ставьте ничего после ключевого слова "Тогда".

If My.Computer.FileSystem.FileExists("pack/locale_ro.epk") Then
  My.Computer.FileSystem.DeleteFile("pack/locale_ro.epk")
  PB_GSM.Value = 10
End If

Если вы ищете ситуацию else-if, это будет синтаксис:

If My.Computer.FileSystem.FileExists("pack/locale_ro.epk") Then
  My.Computer.FileSystem.DeleteFile("pack/locale_ro.epk")
  PB_GSM.Value = 10
ElseIf My.Computer.FileSystem.FileExists("pack/locale_ro.eix") Then
  My.Computer.FileSystem.DeleteFile("pack/locale_ro.eix")
  PB_GSM.Value = 20
' etc, etc
End If

Обратите внимание, что это будет запускать код только в первой найденной строке "True".

Для DownloadFile вам также необходимо указать место назначения:

My.Computer.Network.DownloadFile("http://example", "c:\temp\myfile.txt")

Заменить c:\temp\ путь с тем, который вы используете.

Answer 2

Когда вы публикуете Then заявление с последующим выражением, которое закрывает If заявление. Вы, по сути, уже закрыли все свои If заявления.