Sub и несколько строковых аргументов - VB

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

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

Доброго времени суток! Сразу скажу, что VB почти не знаю, так что сорри за тупой вопрос. Но спросить не у кого, в Инете тоже ничего не нашел... Написал в модуле Access процедуру Sub с 3-мя текстовыми аргументами: Public Sub CheckField(Table1 As String, Table2 As String, Field As String) CurrentDb.Execute ("delete from " + Table2) CurrentDb.Execute ("insert into " + Table2 + " select ID from " + Table1 + " where " + Field + " like '* *'") CurrentDb.Execute ("update " + Table2 + " set Поле='" + Field + "',Ошибка='Двойной пробел' where Поле is NULL") End Sub Private Sub qw() CheckField("Дела","TextErrors", "NameDela") MsgBox "Готово!" End Sub Уже при написании кода (в той строке, где процедура CheckField вызывается) vb показывает ошибку - Compile Error: Expected: = При этом, раньше все отлично работало, когда в процедуре использовался только 1 аргумент (Field) и процедура вызывалась так: CheckField("NameDela"). Сейчас захотелось совершенства и имена таблиц тоже передавать в качестве аргументов, но вот не получается... Подскажите, пожалуйста, как правильно вызвать процедуру.

Решение задачи: «Sub и несколько строковых аргументов»

textual
Листинг программы
Call CheckField("Дела","TextErrors", "NameDela")

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

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

14   голосов , оценка 3.643 из 5