Вмассиве содержится 10 случайных чисел . выведите на экран все четные числа и отдельно нечетными числами visual basic 6.0

Let array = [1, 2, 8, 4, 12, 35, 2, 5, 6, 21];

let odd = [Int];
let even = [Int];
for (number in array) {
     if ((number mod 2) == 0) {
           odd.append(number);
     } else {
           even.append(number);
     }
}

println('Четные числа: \(odd)');
println('Нечетные числа: \(even)');