Sergey В.

При обращении к значению в Cells всегда указывайте свойство Value. Так:

If WBook.Cells(q, 7).Value = ArrayPhoneAll(i) Then

Также имейте в виду, что одно из сравниваемых значений может быть Nothing

Entity Framwork использует подход Code-First. Это значит, что Вы сначала описываете структуру БД с помощью классов, а потом делаете миграцию и в БД создаются таблицы согласно описанной структуры. Такой подход удобен тем, что Вы можете видеть в программном коде все ссылки на конкретное поле или таблицу БД. В дальнейшем Вы работаете с таблицами как с объектами. Если в структуре БД потребуются изменения, из легко выполнить.
Обычный SQL запрос тоже можно использовать, например в связке с ADODB. Плюсом этого подхода можно считать относительно легкий порог вхождения. Перед вставкой в код запроса, его можно отладить. Этот подход позволяет лучше понять принципы использвания SQL и лучше начинать с него.
Что использовать - решать Вам, в зависимости от сложности и потребностей проекта.

Можно содержимое через Split разбить в массив (разделитель - перенос строки) и посчитать количество элементов.

Есть куча примеров. Стоит только поискать.

Битрикс24.
На каждый проект можно создать задачу, к ней - подзадачи. Можно назначить ответственного, сроки и и т.д. Есть канбан, мобильная версия, чаты, push оповещения, небольшой общий диск.
Ограничение бесплатной версии - по числу пользователей.

Смотрите документацию к bootstrap по модальным окнам. Там есть и хорошо задокументированные примеры.
Если кратко:
1. Создаёте кнопку, с параметрами (пример): data-bs-toggle="modal" data-bs-target="#exampleModal"
2. В конец html кода страницы вставляете div модального окна, имеющего соответствующий кнопке id="exampleModal" Пока кнопка из п.1 не нажата, div невидим.
3. При нажатии кнопки из п.1 , отображается модальное окно. Отправка запроса на контроллер производится при нажатии кнопки ОК в модальном окне.
Всё.

Чтобы обезопасить себя юридически, нужен договор с представителями этого СМИ.
Лицензия на сайте может быть, а завтра может уже не быть. Соблазн срубить по лёгкому с Вас денег за перепост будет пока нет договора.

Одна из возможных причин - отключены макросы.

Смотрите документацию: https://dev.mysql.com/doc/refman/8.0/en/keywords.html

SELECT Tb1.*, Tb2.*
FROM
(SELECT * FROM material) AS Tb1
LEFT JOIN
(SELECT * FROM blacklist) AS Tb2
ON Tb1.created_by = Tb2.user_id
HAVING Tb2.created_by = 3

Этот проект был создан в устаревшей версии VS.
Для запуска в более новой версии VS требуется перенос (миграция) кода.
VS это делает автоматически, в отчёте миграции видна одна ошибка переноса. Решение по этой проблеме VS не смогла выполнить. Требуется участие человека для завершения миграции.

Dim i as Integer, iMax as Integer, N as Integer, iCnt1 as integer, iCnt2 as integer
Dim a
a = Array(10, 9, 8, 7 ,6, 5, 4, 3, 2, 10)

For i = LBound(a) to UBound(a) ' Ищем максимальное значение
If iMax < a(i) then iMax = a(i)
Next

iMax = iMax / 2
N = 0 ' Кол-во чётных элементов
iCnt1 = 0' Кол-во меньше х0
iCnt2 = 0 ' Кол-во меньше iMax / 2
For i = LBound(a) to UBound(a) ' Проверяем условия
If i Mod 2 = 0 then N=N+1
If a(i) If a(i) Next

Msgbox "Кол-во чётных элементов " & N & vbcrlf & _
"Кол-во меньше х0 " & iCnt1 & vbcrlf & _
"Кол-во меньше iMax / 2 " & iCnt2