Готовый код, нужно перевести на Microsoft Visual Basic

[Ken_Watanabe]

Здравствуйте. Помогите перевести код с делфи/pascal в Microsoft Visual Basic(если быть точнее вот так)=>Tools=>Macros=>'name', Create. Вот код:

program Array22;
var
i:integer; // счетчик в цикле 
k,l,N:integer;
a: array [1..10] of real;
sum:real; // переменная для суммирования нужных элементов 
begin
// ввод данных 
writeln('Введите N (N < = 10))');
readln(N);
writeln('Введите K / L (1 < = K < = L < = N)');
read(K); readln(l);
sum:=0; // начальное значение переменной 
for i:=1 to n do
begin
// ручной ввод значений массива 
write('a[',i,']=');readln(A[i]);
end;
writeln('Результат');
for i:=1 to N do
Sum:=Sum+a[i]; // суммирование нужных элементов 
for i:=k to l do
Sum:=Sum-a[i]; // суммирование нужных элементов 
// вывод результата 
writeln('Найти сумму всех элементов массива, кроме элементов с номерами от K до L включительно. = ',Sum);
end.

Вот само задачка: Дан массив размера N и целые числа K и L (1<K<=L<=N). Найти сумму всех элементов массива, кроме элементов с номерами от K до L включительно.

вот как я примерно решил её))

Sub VVV()
Dim N, k, l, sum, i
Dim a array [1..10] of real   // подправьте пожалуйста
N = InputBox("введите N (N < = 10)) ")
l = InputBox("введите K и L")
sum = 0
For i = 1 To N
begin
write ("a[",i,"]=");readln(A[i]);     // подправьте пожалуйста
 End
  MsgBox " Результат "
 For i = 1 To N
sum = sum + a(i)
For i = k To l
sum = sum - a(i)
Writeln("Найти сумму всех элементов массива, кроме элементов с номерами от K до L включительно. ", sum)    // подправьте пожалуйста
  End
End Sub