Напишите пожалуйста программу к этой задаче для Visual Basic
Имеется массив К из Nцелых чисел. Составьте алгоритм подсчета, сколько раз число 5 встречается среди элементов данного массива, иначе сообщить: «таких нет».

#include <iostream>#include <vector>using namespace std;int main() { int n, x, five = 0; cin >> n; vector <int> k; for (; n > 0; cin >> x, k.emplace_back(x), n--); for (int i = 0; i < k.size();) {  if (k[i++] == 5)   ++five; } if (five == 0)  cout << "There is no such"; else  cout << five; return 0;}