как вывести результат расчета????? в VB

[Николай969]

условие задачи звучало так: В группе студентов определить старшего по возрасту, если есть данные о возрасте каждого студента. вот мой вариант, но он не работает не выдает ответ. Может кто подскажет.
Sub sss()
Dim N, I, K, M As Integer
Dim B(3) As Integer
Dim A(3) As String
N = InputBox("kol")
For I = 1 To N
A(I) = InputBox("fio")
B(I) = InputBox("voz")
Next I
M = B(I)
K = 1
For I = 2 To N
If B(I) > M Then
M = B(I)
K = I
End If
Next I
Debug.Print "M"
End Sub

[Николай969]

всех благодарю сам дотяпал