Для данного натурального числа найдите число число, цифры которого записаны в обратном порядке. (vba)

в dim что написать?

В данном случае можно ничего не писать, программа проверена, она работает

спасибо

Пожалуйста

Если что-то не описано, по умолчанию оно имеет тип variant

Sub aaa()    s = InputBox("Исходное число")    k = Len(s)    For i = 1 To k \ 2        t = Mid(s, i, 1)        Mid(s, i, 1) = Mid(s, k - i + 1)        Mid(s, k - i + 1, 1) = t    Next    MsgBox sEnd Sub