Переставить буквы в слове слева направо

[вася радугов]

Переставить буквы в слове слева направо
У меня есть программа на Delphi но у меня не получается ее переделать на Visual Basic. Подскажите как лучше ее переделать на Basic.
Код на Delphi

program Project2;

{$APPTYPE CONSOLE}

uses
  SysUtils;
   Var word: string[30];

       Ch: char; 

       i: byte;
begin
  { TODO -oUser -cConsole Main : Insert code here }
        Readln(word); 

       For i:=1 to trunc(length(word)/2) do 

              begin

                             Ch:=word[i]; 

                               word[i]:=word[length(word)-i+1]; 

                               word[length(word)-i+1]:=Ch;

             end; 

       write(word);
end.

[gaw4]

a = "1234567"
b = StrReverse(a)
Print b

[вася радугов]

спасибо за помощь. все получилось!!!